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FANZINES" 
PARTY 


Apparemment le retour des 
fanzines dans CPC Infos semble 
plaire (surtout à ceux qui font des 
fanzines d’ailleurs), c’est pour- 
quoi, vous trouverez d’autres pro- 
ductions dans ces pages. 

Quelques petits changements sont 
intervenus depuis le dernier CPC : fers 
Start CPC n'existe plus. Un faire-part En spin 
nous a été envoyé pour signaler la dis- 

parition. C’est bien dommage mais cela 
comfirme que la durée de vie des fan- 
zines est limitée dans le temps. 

Vous trouverez sur cette page deux 
fanzines déjà mentionnés mais dont 
voici des numéros plus récents. Il 
s’agit de Read Only, qui a changé 
son logo et sa présentation généra- 
le. C’est pas mal du tout mainte- 
nant (pour l'adresse voir dans le 
numéro précédent). 

Les Dieux du CPC : Le retour. Ils 
sont déjà dans ce numéro mais 
vous trouverez ici la couv’ d’un 
numéro plus récent. sa. 
Pour les autres, continuez à en- /} Sous ne Re dut HET x 
voyer vos oeuvres, je trouve- } //## 22.2 ee BEI < A 
rais bien une petite place pour | 555; ef SACS & B à à 
les caser dans les pages de É 

CPC-Infos. Bien sûr, les fan- 
zines sur disques sont les 
bienvenus (mais les photos À Lo 
seront en N/B). LR 
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LES DIEUX 
Dee. 
LE RETOUR 


Pour leur retour, les Dieux du CPC 
frappent fort : 20 pages (en recto- 
verso) avec dedans tout ce qu'il 
faut pour satisfaire les passionnés 
d'Amstrad mais pas les passion- 
nés de géophysique Ah on ne 
peut pas tout avoir. Moi ce que 
Je préfère dans ce numéro ce 
sont les bancs d'essai utilitaires. 
Ça tombe, il Y a un dossier avec 
OCP, Textomat, Jade, Oxford 


M] Pao, Discology 5.1, Odd job, Her- 


\ cule (oui le logiciel qui rit quand 
on … enfin voilà) et Turbo Copy. Il 
| y a aussi des tests de jeux mais je 
dois dire que cela ne me trans- 
cende pas vraiment. On trouve 
aussi de la pub pour les autres 
fanzines, une minuscule initiation 
au Basic et la dénonciation du 
mois (Nous on n'a pas donné 
d'accord pour repiquer quoi que 
ce soit, mais si on nous le deman- 
| de, c'est OK). 


q | 


pe Sat 


AL - 00 NN 


CHANTAUE NTRADTENNE WE 
| Realisation HI 
ik vous 


AM Page ET 
a LE al à tons ns 8 
A + jrenet quero Îe CHE 


puits dus 
Gatuites 


: is Hit rs \ 
Vs reg nÉOTAAVIQUE PL Lane 
hstrl LI 4 Eh (Lee ds | 


A Satare ErEX IN TRS 
| SR TS LS 


11 genial ! La Ann ND Mutiiar jie 5 
tee LUQUR Lux LE 
a FRA Vi v 

pre gi Faut habituer aUX | pavoez À ervelur? 


WANT f] il 1 conne NE rt 


TTES (eo 
KT DE 


us 
ag" 


er ANA 


C6 


'ACE Q1 -) 
de 3 LE eue 


TS-LE COUP DE rouppy 


? INITIA 
LDITS 


S/REPONSES - 
MOST a LEURS SCORES 


SEMNCIALINS Du aps 


EDIT4 


SALUT LES MES, 5 


UT L£s 
APr8s avoir LES ANCELETIES 1 : 


Je, trop long- 
’ us TévGici, 

1 ses n'etions pjus là 
Urez tout! Mais 

€É vous aver | 
avez 

se Aa Du avait légerement 

: plus FE sait, Les dessins 


der M Pas que (ED 
Dr Pas vrai, je bôssert) p 


QUI on peut ! Mais 
t que II aPplaudir, 
HE Mirapavier envoye (NX dire qu'il à pris pe 
®s parler charogne Unést 1e nagot 3e AMC pas 
ne ,CED: argh!! ty se œil est 
an, 
Ur 


RON - NES —) Nu 
canga- HMCTIR ? | 


É ht DE TOUS EST 


CHRONIQUE 
AMSTRADIENNE 


Avec AMS Pagemaker (voir couverture) on 
peut faire des tas de choses, par exemple 
la Chronique amstradienne. Je ne sais pas 
si ce fanzine existe encore car les auteurs 
ont déjà renoncé à leur précédente pro- 


are duction : AM-GAMES, faute de lecteurs. 


En tous les cas, Sonny et Z80 sont là pour 
faire les tests de jeux, les bidouilles et la 
pub pour les copains. 


Chronique Amsfradienne 
14, rue Mgr Benzier 
57100 Manon 





: - gro ES n'exie “À. On gesont donnée] 
La majeure partie des deux pa- M" | sisponips 07 et votre LOUS Je nouven "28 al sh de SF Tape at sh 
ges recto-verso de Micro-stand di none. Si vou 
est occupée par un article d'ini- 

tiation à la gestion des fichiers, 

ainsi que par un reportage (court) 

sur l'informatique en Espagne. 

Donc pas trop de bancs d'essai 

Jeux et pas trop de bidouilles. La 

présentation est sobre avec de 

rares illustrations mais les textes 

tiennent plutôt bien la route. 

C'est tout pour ce numéro 3: 

écrivez à l'adresse sulvante pour 

avoir d'autres renseignements. 


Micro-Stand 
39 bis, route de Villerbon 
41260 La Chaussée St Victor 


Ce fanzine fait partie de la famille 

qui n'utilise pas les logiciels de 

PAO. Cela lui donne un air plus 

triste que ces collègues pleins de 

digits et d’habillages délirants. Le 
contenu est sans surprises : des 

tests de jeu, des trucs (enfin, un 

truc). Dans ce numéro 9, qui n'est 
pas le dernier à ma connaissan- | 
ce, il y a un supplément qui, lui, 

utilise Oxford et qui laisse bien 
augurer pour les futurs numéros 

de Reset. 


J.P. Etienne 
«Les Fossés» 
Bd de l’Europe 
72600 Mamers 
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3ème partie 





| G.DUBUS | 


Ce mois-ci, plein d'astuces utiles pour assurer la maintenance de vos 
fichiers et de vos répertoires : mettre à jour, renommer, effacer, 
récupérer, copier. 

En prime, quelques conseils déjà connus mais qu’il n’est pas mauvais 
de rappeler de temps à autre, sur la saisie des Listings de la revue et 
leur utilisation. 


EXPLOITATION 
DES FICHIERS ASCII 


es, 
| SS Pour lire le contenu d’un fichier AS- 
Cll, il faut d'abord l'ouvrir en entrée 
(OPENIN). Puis il faut entrer les va- 
riables depuis le canal disquette 
(#9). Il y a pour cela 2 commandes 
: INPUT et LINE INPUT. La première considère la variable 
comme terminée dès qu'elle rencontre un délimiteur : 
virgule, guillemet ou retour-chariot. La seconde ne re- 
connaît comme délimiteur que le retour-chariot. 

LINE INPUT est donc à préférer pour les variables al- 
phanumériques, qui peuvent ainsi inclure virgules et 
guillemets. 






En fin de lecture, on referme le fichier en entrée (CLO- 
SEIN). 


Pour lire le fichier DONNEES et l'afficher, voici le pro- 
gramme LECTURE : 


10 OPENIN“DONNEES” 

20 LINE INPUT#9,C$:PRINT C$ 
30 INPUT#9,R!:PRINT R! 

40 INPUT#9,E%:PRINT E% 

50 CLOSEIN 


Et si on ne connaît pas le nombre et le type des varia- 
bles enregistrées ? Alors on les entre par LINE INPUT 
dans une variable alphanumérique, une à une jusqu'à 
la fin du fichier (EOF) : 


10 OPENIN“DONNEES” 

20 WHILE NOT EOF 

30 LINE INPUT#9,A$:PRINT A$ 
40 WEND 

50 CLOSEIN 


OBGGUUGOUE 


La boucle des lignes 20 à 40 exécute la ligne 30 tant 
qu'on n'a pas atteint la marque de fin de fichier (EOF 
= code ASCII 26). Traduit en clair, cela donne ceci : 

- La condition "Ce n'est pas la fin du fichier” est-elle 
vraie ? Oui (20). 

- Alors on lit le fichier jusqu'au premier retour-chariot, 
on affecte ce qui est lu à la variable A$, qu'on affiche 
à l'écran (30). 

- L'instruction de fin de boucle (40) renvoie en tête de 
boucle (20). 


Dès qu'on arrive en fin de fichier, la condition de la 
ligne 20 n'est plus vraie, et on saute à la ligne 50 (on 
sort de la boucle). 

Si cela vous surprend qu'une variable numérique en- 
registrée dans un fichier ASCII puisse être affectée, à 
la lecture de ce fichier, à une variable alphanuméri- 
que, souvenez-vous qu'un fichier ASCII, par définition, 
ne contient que des caractères. 

Dans le programme LECTURE, les instructions INPUT#9,RI 
et INPUT#9.E% transforment la représentation ASCII de 
ces variables en valeurs numériques, affectées ensuite 
à R! et à E%. PRINT et PRINT#9 assurent la transformation 
inverse. 


Si le fichier DONNEES, quelle que soit son extension, est 
un fichier de type Basic, une tentative de chargement 
par OPENIN donne le message d'erreur File type error, 
sauf si c'est du Basic sauvé en ASCII. 


Pour modifier une ou plusieurs des variables enregis- 
trées dans DONNEES, il suffit de le charger par le pro- 
gramme LECTURE, puis de changer la où les Valeurs en 
mémoire. Exemple : vous tapez E%=123 (+ENTER). Puis 
la commande CHAIN“ECRITURE” sauve à nouveau les 
variables, sous le même nom de fichier. La version 
précédente de DONNEES se retrouve alors avec l'ex- 
tension BAK. 

Cet exemple était volontairement simpliste (il y avait 
seulement 3 variables, de types différents). Dans un 
vrai fichier ASCII de données, par exemple un carnet 





d'adresses (très original 1), vous trouvez des ENREGIS- 
TREMENTS rangés à la suite : chaque enregistrement 
comprend un certain nombre de CHAMPS (ou ZONES) : 
ce sont les variables. Exemple : 

- champ 1 : Nom$ (alphanumérique) 

- champ 2 : Prenoms$ (alphanumérique) 

- champ 3 : Age% (numérique entier) 

- champ 4 : Adresse$ (alphanumérique) 

Dans chaque enregistrement, correspondant à une 
ficher complète, les champs sont toujours lus ou écrits 
dans le même ordre : c'est la STRUCTURE du fichier. 


Le modification d'un enregistrement de cet exemple 
de carnet d'adresses (fichier CARNET est facile, en 
sachant qu'il est possible d'ouvrir simultanément 2 fi- 
chiers ASCII, l’un en lecture et l'autre en écriture, à 
condition que les désignations soient différentes. 
- Renommer CARNET en CARNET.BAK 
— Ouvrir CARNET.BAK en lecture et CARNET en écriture 
- Boucle : tant que ce n'est pas la fin du fichier 

. lire les 4 variables de l'enregistrement courant 

e les afficher 

+ demander à l'utilisateur s'il veut modifier 

l'enregistrement 

e si oui, entrer les nouvelles valeurs 

e écrire les 4 variables 

e fin de boucle : avancer d'un enregistrement, 

et retour en tête de boucle 
- Fermer les 2 fichiers 
- Effacer CARNET.BAK 
Cette description pas à pas des opérations s'appelle 
Un ALGORITHME. 


Voici le programme MISAJOUR correspondant : 


10 IREN,“CARNET.BAK”,“CARNET.” 

20 OPENIN“CARNET.BAK”:OPENOUT“CARNET” 

30 WHILE NOT EOF 

40 LINE INPUT#9,Nom$:PRINT“Nom : ”;Nom$ 

50 LINE INPUT#9,Prenom$:PRINT“Prénom : ”;Prenom$ 
60 LINE INPUT#9,Age%k:PRINT“Age : ”:Age% 

70 LINE INPUT#9,Adresse$:PRINT“Adresse : ”;Adresse$ 
80 INPUT“Voulez-vous modifier l'enregistrement O/N 
”;A$ 

90 IF UPPER$(A$S)="O” THEN LINE INPUT“Nom 
";Nom$:LiNE INPUT“Prénom ”;Prenom$:INPUT“Age 
Age%:LiNE INPUT“Adresse ”;Adresse$ 

100 PRINT#9,Nom$:PRINT#9,Prenom":WRITE#9,Age%: 
PRINT#9,Adresse$ 

110 WEND 

120 CLOSEIN:CLOSEOUT 

130 IERA,“CARNET.BAK” 


Si la réponse à la question de le ligne 80 est autre que 
*O”, alors on passe directement à la ligne 100, qui 
recopie dans ce cas les variables non modifiées. 


Pour supprimer l'enregistrement courant, ajoutez les 2 
lignes suivantes : 


74 INPUT“ Voulez-vous supprimer l'enregistrement O/N 
”;A$ 
76 IF UPPER$(A$)=“O” THEN 110 


Si vous répondez 
pas recopié. 


*O”, l'enregistrement courant n'est 


Et pour insérer un nouvel enregistrement juste après 
l'enregistrement courant ? Les 2 lignes à ajouter sont : 


104 INPUT“Voulez-vous ajouter un enregistrement O/N 


106 IF UPPER$(A$)=“O" THEN 90 


Un petit tuyau bien utile : à la lecture de chaque 
enregistrement, la Valeur des variables change. Pour 
les variables alphanumériques, les nouvelles valeurs 
n'écrasent pas les anciennes, mais viennent se placer 
à côté en mémoire. L'accumulation des anciennes 
valeurs non récupérables, dites “Valeurs mortes”, peut 
à la longue saturer la mémoire. Le malaise, c'est que 
le système attend le dernier moment pour faire le 
grand ménage, qui bloque toute autre opération : 
cela peut durer un bon quart d'heure... 

La commande PRINT FRE(“”) force le coup de balai à 
la demande, et affiche aussitôt après le nombre 
d'octets disponibles en mémoire. La ruse, c'est de 
lancer cette commande automatiquement à de brefs 
intervalles ; le temps d'arrêt dû au nettoyage est alors 
imperceptible. Pour éviter l'affichage de la mémoire 
disponible, on bloque l'affichage en début de com- 
mande, et on le rétablit à la fin. Ce qui donne : 


5 EVERY 1000,0 GOSUB 10000 
10000 PRINT CHR$(21);FRE(“”");CHR$(6);:RETURN 


DEUX INSTRUCTIONS 
BIEN UTILES 


n'es Votre disquette de travail com- 
mence à se remplir, elle contient 
un peu de tout. Vous vous aperce- 
vez que certains fichiers ont été 
nommés à la hâte. Que faire pour 


changer leurs désignations ? Très simple : 





IREN, “nouvelle désignation”, “ancienne désignation” 
Dans la désignation d'un fichier, seul le nom était obli- 
gatoirement à préciser pour LOAD et RUN. Ici, comme 
dans la commande de suppression que nous allons 
voir, il faut indiquer le nom ET l'extension. 

REN est l'abréviation de REName (renomme). Le “|” 
placé devant indique qu'il s'agit d'une RSX (extension 
des commandes Basic), comme IUSER. Ces RSX sont 
stockées dans une 3ème ROM, celle du lecteur. 

La nouvelle désignation ne doit pas correspondre à 
celle d'un fichier déjà existant, sinon le système vous 
le signale : 


<fichier> already exists 

Mais la désignation comprend un 3ème élément, le 
numéro d'utilisateur. Ce qui signifie que grâce à la 
commande REN, vous pouvez déplacer un fichier d’un 
USER à l'autre, par exemple ESSAI.BAS de l'USER O à 
l'user 5 : 

IREN,“S:ESSAI.BAS”,“O:ESSAI.BAS” 


Si vous voulez éliminer de vieux fichiers devenus inutiles, 
c'est la commande ERA (de ERAse, effacer, suppri- 
mer) qui convient : 


IERA,“MACHIN.BAS” ou IERA,“0O:MACHIN.BAS” 

En fait, cette commande place MACHIN.BAS dans 
l'USER 229, comme nous l'avons vu, et rend disponibles 
les secteurs qu'il occupe et son entrée au catalogue. 
Si le fichier à effacer ou à renommer n'existe pas, vous 
obtenez le message “<fichier> not found”. 





JOUONS NOS JOKERS 
Q S'il y a plusieurs fichiers à effacer, il 


faut répéter la commande à cha- 
que fois. C'est long, surtout pour 
ceux qui utilisent leur clavier com- 
me on fait dans les commissariats. 
La solution, c'est d'indiquer dans la désignation la ou 
les parties communes aux différents fichiers à effacer, 
et de remplacer le reste par des JOKERS. | ÿy en a 2: 

- ? remplace une lettre à la fois, 

- * remplace tout ou partie du nom et/ou de l'exten- 
sion. 

A?7?????.BAS ou A°.BAS signifie : tous les fichiers BAS 
commençant par À ; *.BIN signifie : tous les fichiers BIN. 


Quelques exemples d'effacement par lots : 

- tous les fichiers BAK (de noms différents) : 
IERA,“*.BAK” 

- tous les fichiers commençant par PROG : 
IERA,“PROG?7?7.°” où IERA,“PROG*.*” 

- tous les fichiers dans l'USER courant : 

IERA, “*.*” 

Attention, il n’y a pas de demande de confirmation | 
- tous les fichiers de l'USER 2 : 

IERA,“*.*” (même remarque). 


RESURRECTION DES MORTS 


… Dans un moment de distraction, au 
, leu de IERA,“*.BAK”, vous avez 

exécuté la commande IERA,“*.*”. 

La disquette ne présente plus qu'un 

| catalogue vide à vos regards affo- 

lés. ar tolé pour récupérer un fichier hyper-impor- 

tant ? 

Certains utilitaires de gestion de disquettes réalisent 

des merveilles, si Une sauvegarde ultérieure n’a pas 

écrasé les secteurs du fichier à récupérer. 

Discology ne convient pas, mais vous pouvez entre 

autres vous servir d'Odd Job, ou de l'éditeur de cata- 

logue publié dans AMSTAR & CPC n° 46 du mois de 

Juin 1990 (CATEDIT). Les opérations sont simples et clai- 

rement expliquées à l'écran. L'utilitaire remplace sim- 

plement le n° d'USER 229 par le n° ©. 

Sinon, utilisez l'astuce suivante, pour récupérer 

MACHIN.BAS, par exemple : 

POKE &A701,229:IREN,“0:MACHIN.BAS”,“MACHIN.BAS" 

:POKE &A701,0 

qui effectue la même opération. 





SN 


OBGGUUSOUE 





Je ne vous apprendrai ici à copier 
que vos propres fichiers, créations 
personnelles ou listings de la revue. 
Toute copie de logiciels commer- 
ciaux, à but lucratif ou non, est ré- 





primée par la loi. 


Il y a bien des manières de copier des fichiers. D'abord 
la plus évidente, sinon la plus rapide. Vous pouvez 
copier d'une disquette sur une autre un programme 
en Basic ou en Binaire : 

- en chargeant le programme en mémoire (LOAD), 

- en plaçant dans le lecteur une disquette formatée, 
- et en utilisant la commande de sauvegarde corres- 
pondant au type de fichier (SAVE). Ne pas oublier les 
paramètres de début et de longueur en Binaire. 

C'est une copie fichier par fichier. Si vous en avez 
plusieurs à copier, il faut répéter pour chacun l'en- 
semble des opérations. Vous pouvez changer le nom 
du fichier au passage. 

Vous pouvez aussi recopier de cette manière un fichier 
sur la même disquette (pourquoi pas ?). Si vous chan- 
gez le nom, original et copie pourront coexister sous le 
même n° d'USER. Sinon, vous incorporez le nouveau n° 
d'USER dans la désignation de sauvegarde ESSAI.BAS 
se trouve dans l'USER par défaut (0) : copions-le dans 
l'USER 4 : 

LOAD“ESSAI.BAS”:SAVE"“4:ESSAI.BAS” 


Autre méthode de copie individuelle de fichiers, mais 
permettant de travailler par lots avec l'aide des Jokers : 
la commande PIP de CP/M. Insérez dans le lecteur la 
première disquette système, face 1 sur le dessus, et 
tapez ICPM. A l'apparition du message d'attente de 
CP/M (A>), tapez PIP (+ ENTER). Le message d'attente 
de PIP est un astérisque (*). À son apparition, vous 
pouvez enlever la disquette système et mettre en pla- 
ce la disquette source (Vontenant le ou les fichiers à 
copier). 

Comme avec REN, on indique d'abord la destination, 
ensuite l'origine. Ne croyez surtout pas le Manuel lors- 
qu'il affirme que vous voulez recopier ESSAI.BAS ? Ta- 
pez donc : 

B:=A:ESSAI.BAS 

OU, si vous voulez renommer le fichier en même temps, 
par exemple : 

B:TEST.BAS=A:ESSAI.BAS 

et appuyez sur ENTER. 

PIP charge le fichier : depuis le début, CP/M vous 
informe que le lecteur est bien le lecteur A (Drive is 
A:). Puis il vous demande de changer de disquette et 
d'appuyer sur une touche quelconque (Please put 


the disc for B: into the drive then press any key). Cela 
fait, il vous signale que le lecteur est maintenant le 
lecteur B (Drive is B:). Le travail terminé, il réaffiche le 
message d'attente (*). 

Si vous désirez alors copier un autre fichier, n'oubliez 
pas d'inverser A et B dans la commande : le lecteur B 
est maintenant le lecteur courant (donc le lecteur 
source), et le lecteur destination sera A. Nouvelle in- 
version pour le fichier suivant, etc. 

Si le fichier est trop gros pour être copié en une seule 
passe, échangez les disquettes chaque fois que PIP 
vous le demande, jusqu'à réapparition de l'astéris- 
que. 

De même si vous désirez copier tout ou partie des 
fichiers d'une disquette sur une autre, par les com- 
mandes : 

B:=A:°.", B:=A:°.BAS, B:=A:E°.*, par exemple. 

Avec PIP, il faut toujours préciser l'extension où la rem- 
placer par un Joker. PIP copie également les fichiers 
ASCII et les types de fichiers propres à CP/M (COM et 
SUB). Pour revenir sous CP/M, tapez seulement ENTER 
à l'apparition de l'astérisque. 


La copie par LOAD/SAVE ou PIP, même si vous de- 
mandez à copier d’un coup l'ensemble de la disquet- 
te, est une copie logique, fichier par fichier. Même s'ils 
sont morcelés sur la disquette source, ils se retrouvent 
sur la disquette destination sagement rangés à la suite 
les uns des autres, sur des secteurs contigus. 

C'est là le moyen, évoqué le mois dernier, de restruc- 
turer les fichiers éclatés en les coplant d'une disquette 
sur l'autre, après avoir éventuellement effacé les fi- 
chlers BAK. La meilleure méthode est d'utiliser la com- 
mande PIP : B:=A:°.°. Il n’y a plus ensuite qu'à refor- 
mater la disquette d'origine pour une autre utilisation. 


La copie physique reproduit la disquette source, piste 
par piste et secteur par secteur, sans aucune défrag- 
mentation des fichiers. Pour cela, toujours sous CP/M, 
utilisez Disckit2 ou Disckit3, avec l'option Copy. 

Il suffit de suivre les Indications à l'écran (en anglais, 
voir la traduction dans le Manuel). La disquette desti- 
nation n'a même pas besoin d'être formatée. Disckit 
reconnaît le format de la disquette source, formate le 
cas échéant la disquette destination pendant la copie, 
et vous en informe. L'opération terminée, prenez l'op- 
tion Verify (pour voir si tout s’est bien passé). 

Un détail : si la disquette source est formatée en 42 
pistes, les 2 dernières seront perdues car disckit ne 
peut lire et écrire que sur 40 pistes. 


Dernière possibilité : l’utilisation d'un gestionnaire de 
disquettes. Pour cet usage, Discology est certainement 
le plus connu et le plus performant. Il peut effectuer 
tant de copies logiques que des copies physiques de 
disquettes. Dans le second mode, il formate éventuel- 
lement la disquette destination au même format que 
la disquette source (Jusqu'à 42 pistes), et reconnaît 
tous les formats, même exotiques. 

Vous pouvez aussi Utiliser CATEDIT (voir plus haut) pour 
la copi logique de fichiers. 

Attention : si vos fichiers sont vraiment très morcelés, 
Discology en mode copie de fichiers peut donner des 
résultats bizarres. Vous n'aurez pas cet inconvénient 
avec LOAD/SAVE, avec PIP ou, paraît-il, avec CATEDIT. 





LA SAISIE DES LISTINGS 


D'abord, lisez attentivement le 
mode d'emploi accompagnant le 
listing. Il comporte souvent des in- 
dications essentielles pour la saisie 
et l'utilisation. En premier lieu, la 
compatibilité avec VOTRE Amstrad. Si vous avez un 
464 où un 664, pas la peine de passer des soirées à 
taper un programme qui ne concerne que le 6128, 
non ? 

S'il s'agit d'une application scindée en plusieurs pro- 
grammes, respectez à la lettre les instructions de 
l'auteur. Notamment, ne changez pas les noms des 
différents programmes. S'ils s'appellent les uns les 
autres, ils risqueraient de ne plus se reconnaître ! Après 
avoir fini de taper un programme, sauvegardez-le sous 
le nom correct, et tapez NEW (pour blanchir la mé- 
moire) avant de saisir le suivant. Je sais, c'est évident, 
quoique... 





Si un programme est long, pourquoi ne pas fractionner 
la saisie en plusieurs séances ? Tous les listings publiés 
sont en Basic (même les fameux Binaire-en-Data, mais 
oui). Comme je vous l'ai expliqué, un programme Basic 
déjà sauvegardé peut être chargé par LOAD puis affi- 
ché par LIST. Si le programme est complet, ce peut 
être l'occasion de corriger les fautes de frappe par 
EDIT <numéro de ligne>. S'il ne l'est pas, vous notez le 
numéro de la dernière ligne affichée, et vous reprenez 
la saisie à la ligne suivante. En fin de séance ou en cas 
de pause-café, SAU-VE-GAR-DEZ | 

Même si vous ne marquez pas de pause, pensez que 
les coupures de courant peuvent anéantir tout ce que 
vous avez tapé depuis la dernière sauvegarde. Alors, 
tous les quarts d'heure, que diriez-vous d'une petite 
sauvegarde ? Toujours sous le même nom. bien sûr, s’il 
s’agit du même programme. Pas la peine de recharger 
le programme après ces sauvegardes de précaution, 
tant que l'ordinateur est sous tension : le programme 
s'allonge en mémoire au fur et à mesure de la frappe, 
ça je pense que vous l'avez compris. 










- 2 00,54 Re à 
330 DATA 00,5, 8,00, 10,58, 06,06, 00, 06,04  (6,17,00,C3, 0746 Ÿ 
6,00, 00,21,06,03, A5, A6, A5, OBFO © 
10,6, A5, 88, 5, A5, 13AD 
345 DATA 88,06, 6, 00, 33,A5,FE,00,67, BS, CC, 06, 05,00, CE, 18CB 
350 DATA OF,BC,06,17,00,C3,0F,0F, 34, 06,05, 00, OF, 2E, 00,00, 1810 12 
355 DATA 01,06, 03, 0F, 4C, OF. B8, 01, 1F, 03, 2E, OF, 88. 2E. OF. 88. 1DBC 


Pour vous épargner des soucis par la suite, ne prenez 
pas d'initiatives avec les listings. Tapez-les toujours 
exactement comme ils sont : 

- ne supprimez rien, pas même une ligne de REM : 

- n'ajoutez rien, même si vous croyez savoir ce que 
vous faites ;: 

- respectez scrupuleusement la numérotation des li- 
gnes : si vous avez l'habitude d'utiliser la commande 
AUTO pour la numérotation automatique des lignes, 
méfiez-vous : 

- ne modifiez rien, notamment les noms de variables 
qu'il est parfois tentant de raccourcir : 

- attention aux caractères qui se ressemblent, surtout 
lorsque l'impression n'est pas très nette : 

i,j, l, barre du CPM (RSX), i majuscule, 1 

Bet 8 


Normalement, une connaissance minimale du Basic 
devrait vous permettre d'éviter ces pièges. 


Une fois le programme sauvegardé, vérifiez-le avec 
ANTI-ERREURS. Les codes entre > et < en-fin de ligne 
doivent être identiques à ceux publiés avec le listing : 
il ne faut bien sûr pas les taper. 


Les programmes Binaires-en-Data n'ont pas toujours 
ce codage. Par contre, chaque ligne possède une 
somme de contrôle. A l'exécution, la vérification des 
fautes de frappe est automatique, et la ligne fautive 
signalée. Que faire dans ce cas ? Corriger le pro- 
gramme comme n'importe quel programme Basic, 
pardi ! Tapez LIST, puis EDIT <numéro de ligne signalé>, 
comparez au listing, corrigez et sauvegardez à nour- 
veau. 

La pire gaffe que vous pourriez commettre, c'est 
d'exécuter ce genre de programme, une fois la saisie 
terminée, sans l'avoir sauvegardé d'abord. La somme 
de contrôle ne peut déceler toutes les erreurs, notam- 
ment l'inversion de 2 codes hexadécimaux ou la 
même ligne tapée 2 fois avec 2 numéros de ligne 
différents. Si vous lancez par RUN sans avoir sauvegar- 
dé, vous croirez que tout est OK. Si alors vous exécutez 
le programme binaire, vous apprendrez ce que c'est 
qu'un plantage : bloquage total, avec obligation de 
faire un Reset, qui efface la mémoire. Résultat des 
courses : on retape tout depuis le début. 


Un dernier conseil : si vous venez d'exécuter un pro- 
gramme, prenez la bonne habitude de faire un Reset 
avant d'en lancer un autre. Le Reset s'obtient par les 
touches CONTROL+SHIFT+ESC pressées en même 
temps, ou en tapant CALL 0. I! ramène tous les para- 
mètres à leur valeur par défaut, comme lorsqu'on vient 
d'allumer la machine. 


En effet, un certain nombre de paramètres ne sont 
pas affectés par les commandes LOAD ou RUN. Le 
programme Basic précédent est éliminé, mais son hé- 
ritage persiste. Il en est ainsi du HIMEM ou des para- 
mètres fixés par MODE, INK, PAPER, PEN, SYMBOL AFTER, 
DEFINT, DEFSTR. 

Certains messages d'erreur, ou un écran vide (PEN et 
PAPER de la même couleur), n'ont pas d'autre origine. 





GRAFFITI 
& SUPERTEXT 


Frédéric MEUNIER 





Valable pour CPC 464 


Graffiti, est comme son nom ne l'indique pas un éditeur de. graffiti, en 
mode moyenne résolution (mode 1). Mais qu'est-ce qu’un graffiti ? C’est un 
dessin de taille moyenne que l’on glisse partout. 


raffiti est donc un utilitaire 
e composé de plusieurs par- 

ties. La première est l'édi- 
teur, lui-même composé d'un listing 
Basic (‘#Graffit”) et d’un autre lis- 
ting Basic ("$SGraph1”) créant un 
programme en langage machine 
(Graphl.bin”). 


La seconde partie est un listing Basic 
CSAffich”) qui crée un programme 
machine (‘Affich.bin”) comportant 
deux instructions très courtes et très 
puissantes au point de vue Basic 
(car elles sont très faciles à réaliser 
en assembleur) ! 


La première instruction sert à reco- 
pier une zone mémoire écran dans 
une autre zone mémoire et la se- 
conde affiche une zone mémoire 
sur Un décor (sans contour noir 
(comme un sprite)), ces deux ins- 
tructions couplées vous permettront 
d'utiliser les dessins comme des spri- 
tes | 


Leurs syntaxes sont : 
“Call &7000,x,y,adrl,adr2 


où x est la longueur en octets 
(O<x<80) de la zone à recopier, y la 
largeur en lignes “réelles” (0<y<200), 
adfrl est l'adresse source de la zone 
à recopier adresse écran et adr2 
l'adresse où ira se loger la zone. 

ex. : Call 7000,40,16,&C000,&8000 
recopiera en &8000 une zone de 
40x16 octets située à l'adresse 
écran &C000. 


“Call &7042,x,y,adrl,adr2 


affiche à l'adresse adrl (adresse 
écran : &C000<adr2<&FFFF) la zone 
de x et y octets contenue à partir 
de l'adresse adr2. 

Voilà pour les petites routines exté- 
rieures. 


Graffiti est très simple à utiliser (Goys- 
tick ou touches curseurs), il vous suf- 
fit de suivre le guide et de presser A 
si vous êtes perdu. 


Les dessins de 80x40 octets sont 


sauvés à l'adresse &8000 et sont’ 


réutilisables en mode 1. 


La fonction échantillon permet de 
sauver seulement une partie du 
dessin, toujours à l'adresse &8000. 

Si vous vous trouvez dans le menu 
sans le vouloir, pressez Enter” jus- 
qu'à revenir au plan de travail. 


Les applications de Graffiti sont 
nombreuses : logo, titre, sprite, let- 
tres pour scrolling, etc. 


Je laisse le soin aux assidus prati- 
quants de l'assembleur de réaliser 
eux-mêmes leurs propres routines 
d'affichage. 


MODE D'EMPLOI : 

Pressez : 

- * A” pour l'aide : la liste de toutes 
les touches utilisées dans le pro- 
gramme est affichée ainsi que la 
fonction sélectionnée. 


13 


— M pour le menu : 

° sauver : sauve dessin entier. 

e charger : charge dessin (80x40 
octets, adr:&8000). 

e échantillon : sauve portion dessin 
préalablement sélectionné. 

- *E” efface case sous curseur. 

- D” efface dessin. 

- *U” undo : on récupère le dessin 
malencontreusement effacé. 

— "H” ligne horizontale : rempli case 
tant qu'elles sont noires. 

- °V” ligne verticale. 

- °C” on change le crayon (entre 0 
et 3). 

— ‘1" on change les encres (d'abord 
on choisit le crayon puis on incré- 
mente où décrémente avec les 
touches courantes (joys. ou curseur). 
- “Tab” on change la fenêtre de 
travail. 


SUPERTEXT 


Présentation du programme : 

Voici une routine assembleur que 
beaucoup de monde attend |! 
Combien de fois sommes-nous res- 
tés (restées) ébahis devant le moin- 
dre scrolling texte à l'intérieur des 
démos ? Combien de fois avons- 
nous bavés (bavées) devant 
l'écran, admirant de nos petits yeux 
fatigués la beauté des lettres et la 
vitesse de scrolling ? Combien de 
fois avons-nous essayés (essayées) 
en vain de faire ceci en Basic ? 





Eh bien voilà la routine tant atten- 
due | SUPERTEXT est un programme 
comprenant deux routines asserm- 
bleur. La première (située en &7000) 
affiche à l'écran des lettres de 4x16 
octets, la seconde (&7051) fait 
scroller un texte formé de ces mé- 
mes lettres |! Et ceci dans tous les 
modes si vous possédez un alphar- 
bet de la bonne définition. 


4x16 octets cela fait 16x16 pixels en 
mode moyenne définition (utilisé 
pour la démo). 


Les deux routines peuvent être ap- 
pelées du Basic, très simplement. Un 
exemple valant mieux qu'un long 
discours... 


EXEMPLE 1 


10 MEMORY &6FFF 
20 LOAD ‘scrtex”,&7000 
30 LOAD ‘alpha4”,&8000 


40 a$="BONJOUR” 
50 CALL &7000,&C000,@a$ 


— pour faire scroller un texte : 
CALL &7051ligne.@a$ 


N'oubliez pas d'écrire les textes en 
MAJUSCULES | 


Pour des raisons de fluidité et de 
Basic (surtout) le scrolling ne fonc- 
tionne que dans les 36 premières li- 
gnes de l'écran (sur 200, c'est déjà 
pas si mal 1). Surtout, n'oubliez pas 
de terminer la phrase à faire scroller 
par le signe arobas : @. 


Alpha 4 contient des lettres 
(moyenne définition : 16x16 pixels en 
4 couleurs) de A à Z, plus quelques 
signes de ponctuation. C'est à vous 
d'en dessiner d'autres si vous le dé- 


: charge les 2 routines 
: Charge le fichier contenant les lettres 


60 a$=" (YAHOU(C(CA(MARCHE(T\\\@" 


70 CALL &7051,1,@a$ 


Vous remarquez donc que : 

— pour afficher une phrase (<20 
lettres soit 20x4 = 80 octets) : 

CALL &7000,adresse écran.@as$ 





sirez en les chargeant à partir de 
&8000 (A en &8000, B en &8040, C 
en &8080, D...). 


Sur disquette : 

Tapez le créateur de ALPHAA4.BIN, 
sauvez-le et faites RUN. 

Tapez le créateur de SCRTEX.BIN, 
sauvez-le et faites RUN. 

Tapez la démo, sauvez-la et faites 
RUN. 


Sur cassette : 

Tapez les créateurs de ALPHA4.BIN 
et SCRTEX.BIN, sauvez-les sur une 
cassette à part. 

Tapez la démo, sauvez-la sur une 
cassette, chargez le créateur de 
SCRTEX.BIN, faites RUN après avoir 
calé la bande magnétique après la 
démo et faites de même pour le 
créateur de ALPHAA4.BIN après 
SCRTEX.BIN. 

Revenez au début, faites RUN et 
criez : *"OUF !”. 





Ne passez plus de temps à ta- 
per les listings et évitez d’user 
vos petits doigts manucurés 
avec les disquettes CPC Infos. 
Dans la disquette 33 vous trouve- 
rez les programmes des CPC Infos 
n°27186128: 


— Plumpy 


— 2 démos de MOTYF1 & MOTYF2 
— Variables locales 


— VIRUS 


— Les Routines du C.C.C. 


voir bon de commande page 38 








19 lasssssesssesesseecese 
28 ? editeur de graffiti 
38 en mode { 

48 Fev. 199ÿ 

58 " par Fred. MEUNIER 
68 version {.ÿ 

78 pour 

88 *  AMSTAR et CPC 

98 lscsosssssesescecsisse 
198  -- INITIALISATION -- 
119 ? 


129 ON BREAK GOSUB 718 

139 MEMORY &6FFF:1F PEEK(&7998)=9 THEN LOAD'"grafi 
149 INK 8,8:INK 1,26:INK 2,2: INK 3,11 
158 MODE 1:BORDER 8 

169 PRINT CHR$(23) ;CHR$ (9) 

179 dex=ÿ:dey=ÿ 

189 coul=1:x=1:y=1 

199 

289  -- PROGRAMME -- 

219 ? 

228 GOSUB 299 

239 GOSUB 364 

249 GOSUB 428 

259 GOSUB 748 

268 GOTO 519 

. 279 END 

288 

299 ? -- GRILLE -- 

399 


GRAFFITI 


)LA 
)LB 
)LC 
LD 
)LE 
)LF 
)LG 
LH 
»LJ 
)RB 
RC 
>QH 
DUF 
)CV 
)ND 
)UA 
)HF 
NE 
)TA 
RC 
RD 
HE 
HD 
)HB 
HA 
)ZA 
)TC 
TA 
)TB 
RD 


319 PLOT 8,2,1:DRAWR 638,9:DRAVR 9,294:DRAUR -638,9:DRA )JQ 


UR 9,-294 


328 FOR a=4 TO 636 STEP 19:PLOT a,4,2:DRAWR 9,28D:NEXT )XK 
339 FOR a=4 TO 296 STEP 19:PLOT 4,a:DRAWR 632,89:NEXT UP 


349 RETURN 

358 " 

369 * -- FENETRE -- 
378 


)2C 
)RJ 
)RK 
)TA 


389 LOCATE 1,2:PRINT'Dessin...":PLOT #,352:DRANR 638,9: DHY 


MOVER 9,-82:DRAWR -638,9 


398 PLOT 8,279,1:DRAWR 124,9 DVZ 
499 RETURN )YK 
419 ? RF 
428 * -- SCROLING TEXTE -- RG 
439 RH 
448 phr$="Bienvenue dans GRAFFITI... l'utilitaire dont >WY 


vous ne pourrez plus vous passez... Pressez . SPACE. 
" 


458 WHILE INKEY$Q)" " )PX 
468 gau$=LEFT$(phr$, 1) >RA 
478 LOCATE 1,19:PRINT MID$(phr$,1,48):phr$=RIGHTS(phr$, >GK 
LEN(phr$)-1)+gau$ :WEND 


468 GOSUB 1829 )QE 
499 RETURN )ZJ 
585 ? RF 
519 ' -- TOUCHES -- RG 
529 ? )RH 


539 IF INKEY(hau)=8 AND y<28 THEN GOSUB 869:y=y+1:G0SUB >DP 

ir INKEY(bas)=8 AND y>1 THEN GOSUB 864:y=y-1:G0SUB CG 

sr IF INKEY(droi)=9 AND x<63 THEN GOSUB 869:x=x+1:G0SU )EH 

sn 1e INKEY(gauc}=9 AND x>1 THEN GOSUB 869:x=x-1:GOSUB >DK 
838 


578 IF INKEY(feu)=f THEN GOSUB 919:G0SUB 838 )LF 
589 IF INKEY(38)=9 THEN GOSUB 1388 ” MEN DAQ 
U 

599 IF INKEY(61)=$ THEN GOSUB 1799 " EFF AH 
ACE GRILLE 

698 IF INKEY(44)=ÿ THEN GOSUB 1938:GOSUB 838 * LIG DLT 
NE HOR. 

619 IF INKEY(55):9 THEN GOSUB 1199:GOSUB 838 ” LIG >LU 
NE VER. 

628 1F INKEY(58):9 THEN GOSUB 99f:GOSUB 839 * EFF )KA 
ACE CASE 

639 IF INKEY(62)=$ THEN GOSUB 1179 CHA DAE 
NGE CRAYON 

649 IF INKEY(35)=9 THEN GOSUB 1278 ” CHA DAG 
NGE ENCRE 

659 IF INKEY(68)=8 THEN GOSUB 1499  SCR AU 
OL. FENETRE 

669 1F INKEY(42)=:9 THEN GOSUB 1728 ” UND )AG 
0 

679 IF INKEY(69)=ÿ THEN GOSUB 2419 * AID AP 
E 

689 GOTO 539 )ZJ 
698 ? )TF 
788 * -- BREAK -- RH 
718 )RJ 
728 MODE 2:1NK 1,26:INK 9,8:PEN 1:PAPER #:CLS:END RG 
736 DTA 
74g * -- CHOIX -- )TB 
158 ? )TC 


769 LOCATE 1,19:PRINT* Joystick ou Touches (J/T) : >VN 
"isa$=INKEYS:IF a$="" THEN 769 
779 IF UPPER$(a$)="J" THEN hau=72:bas=73:droi:75:gauc=7 >WG 





4:feu=76 ELSE haut=f:bas=2:droi=1:gauc:8:feu=9 


788 LOCATE 1,19:GO0SUB 1829 DUC 
798 RETURN )AB 
886 RJ 
818  -- POINT -- >RK 
828 ? )TA 


838 CALL &7898,coul,x,y:PLOT (x+dex-1)42,279+(ytdey)#2, DYH 
coul:c=TEST((x-1)#19+6, (y-1)+19+6) 


848 RETURN )ZH 
858 ? >TD 
868 " -- EFFACE -- )TE 
879 )TF 
888 CALL &7890,c,x,y:PLOT (xtdex-1)#2,270+(ytdey)#42,c  DXJ 
898 RETURN AC 
998 )RK 
919 * -- REMPLIS CASE -- )TA 
928 )TB 
938 CALL &794C, coul, x, y )RL 
948 PLOT (xtdex-1)42,279+(y+dey)+2, coul )GY 
959 RETURN >ZK 
968 )TF 
979 * -- EFFACE CASE -- )TG 
988 TH 
999 CALL &784C,8,x,y )NQ 
1989 PLOT (x+dex-1)#2,279+(y+dey)+2,8 >DU 
1819 RETURN DEF 
1929 ? XF 
1938 ' -- LIGNE HORIZ. -- )XG 
1949 ? >XH 


1958 no=9:xx1=x:VHILE no=@ AND xx1>8:xxi=xxi-f:no=TEST( )JX 
Cxx1-1)#19+7, (y-1)#19+7) :WEND:xx{=xx1ti 

1868 no=9:xx2=x:VHILE no=# AND xx2(64:xx2=xx2+{:no=TEST )LC 
(Cxx2-1)#19+47, (y-1)#19+7) :MEND:xx2=xx2-1 

1978 FOR xu=xxi TO xx2:CALL &784C,coul,xx,y:PLOT (xxtde DVE 
x-1)42,279+(dey+y)#2, coul :NEXT 


1888 RETURN )FC 
1999 )YC 
1198 * -- LIGNE VERT. -- DXE 
1119 XF 


1128 no=9:yy1=y:WHILE no=8 AND yy128:yy1=yyl-1:no=TEST( DJK 
Cx-1)#19+7, (yy1-1)#19+7) :VEND:yy1=yÿ1+1 

1138 no=9:yy2=y:UHILE no=9 AND yy2<21:yy2=yy2+1:n0=TEST >LH 
CCx-1)#19+7, (yy2-1)#19+7) :VEND:yy2=yy2-1 

1148 FOR yy=yy1 TO yy2:CALL &794C, coul, x, yy:PLOT (x+dex >VL 
-1)#2,278+(yy+dey) #2, coul :NEXT 


1158 RETURN )FA 
1168 )YA 
1178 ' -- CHANGER COULEUR -- )YB 
1189 ? )YC 
1199 LOCATE 1,19:PRINT SPACE$(48) )AY 


1289 LOCATE 1,19:PEN 1:PRINT" COULEUR : ";:FOR a=8 TO )HW 
3:PRINT a" ";:PEN atl:NEXT:j=coul :PEN 1:LOCATE coul#4+i 
4,11: PRINT"; 

1219 IF INKEY(droi)=8 AND i<3 THEN LOCATE i#4+14,11:PRI )ED 
NT" ysi=i+{:LOCATE ix4+14,11:PRINT"*"; 

1229 IF INKEY(gauc)=8 AND i9 THEN LOCATE ix4+14,11:PRI )EQ 
NT" "ssi=i-{:LOCATE i#4+14,11:PRINT"""; 

1238 IF INKEY(feu)=8 THEN coul=i:G0T0 1258 >KP 


1249 FOR a=1 TO 5#:NEXT:GO0TO 1219 )AC 
125 LOCATE 1,19:PRINT SPACES(49) ; :LOCATE 1,11:PRINT SP DLD 
ACE$(49):GOSUB 1828:RETURN 


1268 ' . )YB 
1279 * -- CHANGER ENCRE -- DC 
1288 ' )YD 
1298 LOCATE 1,18:PRINT SPACES (49) )AZ 


1399 LOCATE 1,18:PRINT" Quel crayon : 
PRINT a:1F ai OR a3 THEN 1399 

1318 LOCATE 1,19:PRINT SPACE$ (48) :LOCATE 1, 19:PEN a:PRI BK 
NT" Encre num. : " 

1328 1F INKEY(droi)=8 AND i<26 THEN i=i+1:LOCATE 15,19: RP 
PRINT i:INK a, i 

1338 IF INKEY(gauc)=ÿ AND i9 THEN i=i-1:LOCATE 15,18:P )QG 
RINT i:INK a, i 


"isa=VALCINKEYS): TB 


1348 IF INKEY(feu)=ÿ THEN GOTO 1369 >BG 
1359 FOR z=1 TO 5B:NEXT:GOTO 1329 AJ 
1364 LOCATE 1,19:GO0SUB 1828:RETURN )CB 
1379 ND 
1388 * -- NENU -- )YE 
1398 YF 
1498 CALL &78F2,49,56, &C33B:CALL &7126 )DU 


1419 LOCATE 13,12:PEN 1:PRINT" - MENU -":LOCATE 12,14:P )AAÂ 
RINT"1- Charger.":LOCATE 12,15:PRINT"2- Sauver. ":LOCATE 
12,16:PRINT"3- Echantillon." 


1428 a=VAL(INKEY$):1F aC1 OR a23 THEN 1428 >HY 
1439 IF a={ THEN GOSUB 1858:GO0T0 1478 )CZ 
1448 IF a=2 THEN GOSUB 1958:G0T0 1478 )CC 
1459 IF a=3 THEN GOSUB 2949:GO0T0 1479 CV 
1469 CALL &BB96:CALL &78C8, &C339 )YL 
1478 RETURN )FF 
1488 DYF 
1498 * -- SCROLING FENETRE -- »YG 
1598 NX] 


1518 GOSUB 88:LOCATE 5,19:PRINT" Changer fenetre trava )QF 
il." 

1528 IF INKEY(droi)=8 AND dex(288 THEN GOSUB 1689:dex=d >VZ 
ext4ÿ:GOSUB 1649 

1538 IF INKEY(gauc)=# AND dex>9 THEN GOSUB 16#8:dex=dex DRF 
-49:GOSUB 1649 

1548 IF INKEY(hau)=8 AND dey<29 THEN GOSUB 1698:dey=dey )BN 
+29:sty=2:G0SUB 1648 

1558 IF INKEY(bas)=9 AND dey>f THEN GOSUB 1699:dey=dey- )ZU 
28:sty=#:G0SUB 1648 

1568 IF INKEY(feu):ÿ THEN GOTO 1588 CG 
1578 FOR a=1 TO S9:NEXT:G0TO 1528 AN 
1588 GOSUB 1769:GO0SUB 1829:GOSUB 838:PRINT CHR$(7):RETU DU 
RN 


1598 )YH 
1689 * -- AFFICHE TRAIT -- >XK 
1619 ' )YA 
1628 PLOT ftdexx2,279+dey*4+sty,2:DRAUR 124,9:RETURN  DYE 
1638 )YC 
1649 * -- EFFACE TRAIT -- )YD 
1658 ' )YE 
1669 PLOT f+dexx2,279+dey*4+sty, 1:DRAUR 124,8:RETURN  DYH 
1678 ‘ )YG 
1689 " -- EFFACE GRILLE -- )YH 





)YJ 
1799 CALL &797B:CALL &70F2,80,49,&CDFO:CALL &7126:GO0SUB >YA 
838: pose=1 : RETURN 


1699 


1718 )YB 
1729 * -- UNDO -- )YC 
1738 ! )YD 
1749 IF pose={ THEN CALL &79C8,&C9Fÿ:pose=8: ELSE RETUR AG 
N 
1758 YF 
1769 * -- AFFICHAGE GRILLE -- )YG 
1778 ! >YH 
1789 CALL &714C, dex42,272+dey#2:RETURN >GR 
1798 DK 
1889 * -- AFFICHAGE TITRE -- )YB 
1819 )YC 
1828 LOCATE 1,19:PRINT SPACES (49) :LOCATE 1,19:PRINT"  >CH 
GRAFFITI." 
1834 RETURN >FF 
1849 ? )YF 
1858 ' -- CHARGER -- »YG 
1868 >YH 
1878 CALL &78C8,&C338 NC 
1889 CALL &79F2,49,12,8C005+13x850+64888D:CALL &7126 DRE 
1898 LOCATE 5,15: INPUT" Nom : ",non$:1F LEN(nom$)<i OR L DVX 
EN(nom$)>8 THEN CALL 479C8,4C995+13x859+6*&889:GOSUB 81 
D :RETURN 
1998 CALL &78C8,&C95+13*459+644898 DAT 
1919 non$=non$+".fit":LOAD non$, &8994:CALL &71E3,89, 49, )FC 
&COFS 
1929 GOSUB 1789:x=1:y=1:GOSUB B18 BW 
1938 RETURN )FG 
1949 )YG 
1958 * -- SAUVER -- )YH 
1968 NY] 
1978 CALL &79C8,4C339:GOSUB 868 >)YK 
1988 CALL &78F2,49,12,8C095+13*8459+6x8898:CALL &7126  DRF 
1998 LOCATE 5,15: INPUT"Nom : ",nom$:IF LEN(nom$)<i OR L >VY 
EN(non$)>8 THEN CALL &78C8,&C805+13x859+6%4899:GOSUB 81 
ÿ:RETURN 
2899 CALL &78C8,8CH95+134859+6*8809:CALL &79F2, 89,49, &C DMA 
9F9:GOSUB 819 
2819 non$=non$+".fit":SAVE non$,b, 46998, 3259 )HG 
2928 RETURN )EH 
2838 ' >XH 
2949 ? -- ECHANTILLON -- )XJ 
2858 ' >XK 
2969 CALL &79C8,4C338:GOSUB 869 )YA 
2979 LOCATE 1,19:PRINT SPACES(48):PEN 1:LOCATE 1,19:PRI DFJ 
NT'ECHANTILLON. -> COIN HAUT-GAUCHE, " 
2875 xc-6:yc=274:CALL 47298, xc,yc:GOSUB 2298 DHT 
2989 IF INKEY(droi)=8 AND xc<648 THEN CALL &7241,xc,yc: >XU 
rc=xc+8:G0SUB 2298 
2898 IF INKEY(gauc)=8 AND xc>-2 THEN CALL &7241,xc,yc:x DD 


c=xc-8:GOSUB 2298 
2198 IF INKEY(hau)=9 AND yc<352 THEN CALL &7241,xc,yc:y >WG 
c=yc+2:GOSUB 2298 
2118 IF INKEY(bas)=8 AND yc)272 THEN CALL &7241,xc,yc:y DWE 
c=yc-2:G0SUB 2298 
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2128 IF INKEY(feu)=£ THEN GOTO 2149 

2139 GOTO 2989 

2149 FOR a=ÿ TO 15:POKE &7390+a,PEEK(&7272+a) :NEXT 

2159 LOCATE 1,19:PRINT SPACE$ (49) :PEN 1:LOCATE 1,19:PRI 
NTECHANTILLON. -> COIN BAS-DROITE." 

2155 xci=xcti8:yci=yc-2:CALL 47288, xc1-4,yci+6:GOSUB 23 
58 

2169 IF INKEY(droi)=8 AND xc1(648 THEN CALL &7241,xc1i-4 
,Yc1+6:xci=xc1+8:GOSUB 2339 

2178 IF INKEY(gauc)=8 AND xci>xe THEN CALL 47241, xc1-4, 
yci+6:xci=xci-8:GOSUB 2338 

2188 IF INKEY(hau)=ÿ AND ycityc THEN CALL &7241,xci-4,y 
cit6:yci=yci+2:G0SUB 2338 


2198 IF INKEY(bas)=9 AND yc1>279 THEN CALL &7241,xci-4, DHC 
ycit6:yci=yci-2:G0SUB 2338 

2298 1F INKEY(feu)=g THEN GOTO 222$ )BY 
2219 GOTO 2168 )MB 
2228 LOCATE 1,19:PRINT SPACES (48); )BK 


2238 CALL &7241,xc1-4,yci+6:FOR a=8 TO 15:POKE &7272+a, 
PEEK(&7398+a) :NEXT 


2248 CALL &7241, xc, yc )PX 
2245 a$=INKEYS:IF a$<>"" THEN 2245 AE 
2258 CALL &7BF2, 49,12, &C095+134859+6#488D:CALL &7126 RH 


2251 LOCATE 5,15:INPUT" Non : ",non$:1F LEN(nom$)<i OR L 
EN(non$)8 THEN CALL &78C8,&CB95+134859+6*4899:GOSUB 81 
9:RETURN 

2252 CALL &78C8, &CH95+13x459+6%4808 

2253 CALL &728A, xe+2,yc-2, (xci-xc-2)/8, (yc-yc1-2)/2 
2254 non$=non$+".fit":SAVE non$,b,&8#98, ((xci-xc-2)/8)x 
((yc-yc1-2)/2) 


2255 GOSUB 1829:RETURN )RZ 
2268 )YC 
2278 ' -- CADRE GAUCHE -- )YD 
2288 NYE 
2298 CALL &7298, xc, yc DPF 
2389 PLOT xc,yc, 1:DRAUR 4,9:MOVER -4,9:DRAUR 8, -6 TH 
2314 RETURN DEK 
2329 >XK 
2338 * -- CADRE DROIT -- YA 
2349 )YB 
2358 CALL &7208, xci-4, yc1+6 UV 
2369 PLOT xci,yci,1:DRAWR -4,9:MOVER 4,8:DRAUR 9,6 UK 
2378 RETURN DFF 
2389 ? YF 
2398 ' -- AIDE -- )YG 
2499 )XJ 
2418 CALL &7BF2,68, 128, 4COPB+3x450+6#4B8B:CALL &7126  DTJ 
2429 LOCATE 18,5:PRINT".AIDE.":RESTORE 2448 >MH 


2438 FOR a=1 TO 19:READ tit$:PEN 2:LOCATE 7,a46:PRINT M DM 
ID$(tit$,1,3)"- ";:PEN 1:PRINT NID$(tit$,4,LEN(tit$)):N 

EXT 

2448 DATA "M Menu.","E Effacer case.","D Effacer des >GN 
sin.","U Undo.","V Ligne verticale.","H Ligne horizo 
ntale.","C Changer crayon.","] Changer encre.","TABCh 
anger fenetre travail.","A Aide." 

2458 LOCATE 12,18:PRINT". PRESSEZ SPACE ." D 
2468 z$=INKEYS:1F 2$=" " THEN GOTO 2479 ELSE GOTO 2468 >VC 
2478 CALL &78C8, &CHOB+34459+6x&889 : RETURN HG 


19 ? sanecsssssssscsssarenssss 

28 ’ Createur de AFFICH.BIN 

34 ! rssssescenrcesescssssss 

49 lig=1990:sun=ÿ:check=8 

54 FOR adr=47990 TO &7999+99x8 STEP 
8 

64 sun-f 

78 FOR dec:ÿ TO 7 

75 READ a$:a=VAL("&"+a$):POKE ad 
r+dec,a 

76 sum=sun+a 

8ÿ NEXT 

85 READ c$:1F VAL("&"+c$)<>sun MOD 
256 THEN PRINT'Erreur ligne :";lig: 

STOP 

86 PRINT'Ligne ";lig;"OK.";CHR$(13 
)itlig=ligtis 

9ÿ NEXT 

95 SAVE"affich.bin",b,&7898,89%8 

1999 DATA FE,94,C8,ED, 53,36, 79,DD,85 

1919 DATA 6E,92, DD, 66,43, 22, 34,79, 7C 

1929 DATA DD, 7E, 84,32, 39, 79, DD, 7E,95 

1938 DATA 96,32, 38, 79, 34,39, 79,47, 9A 

1949 DATA C5,E5, 3,38, 79,47,7E, 12,63 

1954 DATA 13,23,18,FA,E1,CD, 26, BC, DA 

1969 DATA C1,19,ED,C9, 90,89, 90,09,67 

1878 DATA 96,90, 09,90, 98, 00,98,00,09 

1989 DATA 99,09,FE,94,C0,ED, 53, 36,38 

1998 DATA 78,DD,6E, 92, DD, 66,93, 22,25 
1199 DATA 34,79,DD,7E, #4, 32, 39, 79,DE 

1119 DATA DD, 7E, 96, 32,38, 79, 3A, 39, AE 
1129 DATA 79,47,C5,E5, 3A, 38, 79,47,8À 

1138 DATA 1A,E6, 88, 28, 96,4F,7E,E6,69 


1149 DATA 77,B1,77,14,E6,44,28,06,11 
1158 DATA 4F,7E,E6,BB,B1, 77, 1À,E6,96 


1169 DATA 22,28,96,4F,7E,E6,DD,B1,91 
1178 DATA 77,1A,E6,11,28, 96, 4F,7E, 83 
1189 DATA EG,EE,B1,77, 13,23, 19,D9,12 
1198 DATA E1,CD,26,BC,C1, 19,C3,C9,ED 
1299 DATA 99,06,00,00,09,00,00,09,00 


GRAFI4 


{g ! mansrsasespsasescsecsess 

24 * Createur de GRAF1.BIN 

34 ! Sasssessesisactssesdess 

49 lig=1989:sun=0:check=ÿ 

58 FOR adr=&7998 TO &7989+89x6 STEP 








68 sun:f 
78 FOR dec:ÿ TO 7 
75 READ a$:a=VAL("&"+a$):POKE ad 
rtdec,a 
76 SUR=SUR+a 
88 NEXT 
85 READ c$:1F VAL("&"+c$) sum MOD 
256 THEN PRINT'Erreur ligne :";lig: 
STOP 
86  PRINT'Ligne ";lig;"OK.";CHR$(13 
)irlig=ligtig 
9ÿ NEXT 
95 SAVE"grafi.bin",b, 47890, 89%8 
1998 DATA FE,93,C8,EB, DD,5E, 92, DD, C6 
1818 DATA 56,93, DD, 7E, 94, CD, DE, BB, 1E 
1929 DATA 1B,D5,2B,EB, 29,29,29,C1,42 
1838 DATA 99,99,01,98,9B,99,EB,ES,F4 
1949 DATA 29,29,29,C1,99,99,81,88,57 
1858 DATA 99,99,06,092,C5,D5, 06, 92,B3 
1969 DATA C5,D5,E5,CD, EA,BB,E1,D1,A3 
1878 DATA C1,13,13, 19,F3,D1,23,23,81 
1989 DATA C1,19,E9,C9, 99,08, 09,09,83 
1999 DATA 99,09,90,90,FE, 93,C8,3E,FF 
1199 DATA 94,32,2B,79,32,2F, 78,3E,E8 
11189 DATA 96,32, 18, 79,32,27, 78,CD,59 
1129 DATA 93, 78,3E, 92, 32,28, 79, 32,B2 
1138 DATA 2F,79,3E, 98, 32, 1B, 78, 32,D4 
1149 DATA 27,70,C9,09, 08,00, 69,00,68 
1158 DATA 99,09,99,3E, 99, CD, DE, BB, A4 
1168 DATA 3E,94, 32, 2B, 79,32, 2F,79,EQ 
1178 DATA 3E, 96, 32, 1B, 79, 32,27, 78,CA 
1189 DATA 11,91,99,21,91,99,06,14,4E 
1199 DATA C5,D5,E5,96,3F,C5,E5,D5, 43 
1298 DATA CD,18,70,D1,13,E1,C1,19,E3 
1218 DATA F4,E1,23,D1,C1,18,E9,3E,C1 
1229 DATA 92,32, 2B, 79, 32,2F, 79,3E,DE 
1238 DATA 986,32, 1B, 79,32,27,78,C9,57 
1248 DATA 96,89,80,00,00,00,00, 00,09 
1258 DATA FE,91,C#,EB, 22,42,71,11,98 
1268 DATA 99,88, 34,49,71,47,C5,E5,5C 
1278 DATA 3A,41,71,47,1A,77,13,23,FA 
1288 DATA 19,FA,E1,CD,26,BC,C1, 19,68 
1298 DATA ED, C9, 98,08, 08,08, 00,08,B6 
1399 DATA 99,09,FE,93,C9,EB, 22,42,1ÿ 
1319 DATA 71,11,99,88,DD, 7E, 94, 32,93 
1328 DATA 41,71,47,DD, 7E,92, 47, 32,CF 
1338 DATA 46,71,C5,E5, 34, 41,71,47,8E 
1349 DATA 7E,12,13,23,19,FA,E1,CD,7E 
1358 DATA 26,BC, C1, 19, ED, C9, 98, 98,69 
1369 DATA 99,09,99,00, 90,99, 2A,42,6C 
1378 DATA 71,3A,48,71,47,C5,E5,3A,87 
1389 DATA 41,71,47,AF,77,23,19,FC,4E 
1398 DATA E1,CD,26,BC,C1,18,EE, C9, 18 
1499 DATA 99,09,00,00,90,00,00,09,09 
1418 DATA 99,09,99,08,FE, 92,CB,3E,FE 
1429 DATA 64,32,2F, 79, 32, 2B, 79, 3E,E8 
1438 DATA 96,32, 1B, 79, 32,27, 78,DD,69 
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1449 DATA 5E,92,DD,56, 93,ED,53, DO, AF 
1459 DATA 71,11,91,98,21,91,98,06,AB 
1469 DATA 14,C5,D5,E5, 6,3F,C5,E5, 82 
1478 DATA D5,DD,5E, 92, DD,56, 93, DD, 25 
1489 DATA 6E,98,DD,66,91,CD, F9, BB, 2A 
1499 DATA D1,E1,E5,D5,CD, DE, BB, CD, 9F 
1599 DATA 19,79,D1,13,E1,C1,DD, 34,17 
1519 DATA 92,CC,D1,71,DD, 34,92,CC,EF 
1528 DATA D1,71,19,D2,E1,23, DD, 34,39 
1539 DATA 99,CC,D5, 71,DD, 34,98, CC,EF 
1548 DATA D5,71,ED,5B, D9, 71, DD, 73,28 
1554 DATA 92,DD, 72,93,D1,C1,18,B1, A7 
1569 DATA 3E, 92,32, 2F, 70,32, 2B, 79,DE 
1578 DATA 3E, 98,32, 18, 78,32,27, 79,CC 
1589 DATA C9,DD, 34,93, C9, DD, 34, 91,BB 
1598 DATA C9,99,99,00,98,08,08,98,C9 
1698 DATA 99,99,00,FE, 83,C9,EB, 11,BD 
1619 DATA 99,89, DD, 46,92,C5,F5, DD, 2C 
1628 DATA 46,94, 14,77, 13,23,19,FA,1B 
1639 DATA E1,CD,26,BC,C1,18,EE, C9, 18 
1649 DATA 99,00,00,00, 00,00, 09,09,00 
1658 DATA FE,92,C#,DD,5E, 92, DD, 56, 34 
1669 DATA 93,DD,6E, 99, DD,66, 91, CB,5D 
1678 DATA 3C,CB, {D, CB, 3A, CB, 1B,CD, DC 
1689 DATA 1D,BC, 11,72, 72,96,88,C5,A1 
1698 DATA ES, 96,92, 7E, 12, 13,23, 19,C3 
1798 DATA FA,E1,CD,26,BC,C1,19,EF, 4A 
1718 DATA C9,09,09,00,05, 99,08, 90,C9 
1728 DATA 99,FE,92,C9,DD,5E, 92, DD, DA 
1738 DATA 56,93, DD,6E, 9, DD,66,41,E8 
1749 DATA CB,3C,CB, 1D,CB,3A,CB, 1B,DA 
1758 DATA CD, 1D,BC, 11,72, 72,86, 98, A9 
1769 DATA C5,E5,86,92, 1A,77,13, 23,79 
1778 DATA 19,FA,E1,CD,26,BC,C1, 19,68 
1789 DATA EF,C9,99,09,00,09,00,99,B6 
1798 DATA 99,00,99,96,98,00,08,00,08 
1898 DATA 99,09, 00,09,80,00,09,09,09 
1819 DATA 99,00,FE, 94,C9,DD,5E, 96,83 
1829 DATA DD,56,87,DD,6E,94, DD, 66,CC 
1838 DATA 95,CB,3C,CB, 1D,CB, 34, CB, C4 
1849 DATA 1B,CD, 1D,BC, 11,99, 89, DD, 2F 
1858 DATA 46,99,C5,E5, DD, 46,92, 7E,93 
1869 DATA 12,13,23,19,FA,E1, CD, 26,26 
1878 DATA BC,C1,1,EE,C9, 09, 88,49, 44 
1889 DATA 99,00,09,00,00,00,99,09,08 
1899 DATA 09,09,90,00,00,90,08, 00,08 


ALPHA4# 


14 ! Soetlassiebssscssecessse 
28 ' Createur de ALPHA4.BIN 


39 V moonmmmmsmsmmcmmmmesme 

49 lig=1998:sur=ÿ 

59 FOR adr-48998 TO &BBCF STEP 8 
68 sun=ÿ 

78 FOR dec:ÿ TO 7 





75 READ a$:a=VAL("&"+a$):POKE ad 


rtdec,a 
76 sun=sus+a 
88 NEXT 


85 READ c$:1F VAL("&"+c$) sum MOD 
256 THEN PRINT'Erreur ligne :";lig: 
STOP 
86 lig=lig+{f:PRINT lig"OK !";CHR$ 
(13); 
9ÿ NEXT 
95 SAVE"alpha.bin",b, &8899, &8CF 
1990 DATA 96,F5,E4,09, 13,FA, FA, 88,68 
1819 DATA 37,FF,F5,C4,17,FF,FE,C8,CB 
1929 DATA 2F,6F,7F,C6,5F,0C, 37,CA,6F 
1939 DATA 2F,8C,37,CE, 1F,9C,37,CE,F8 
1949 DATA 0F,8F,3F,CE,9F,5F,5F,CE,46 
1858 DATA 89B,2F,AF,CE, 9D,1F,5F,4E,98 
1969 DATA 9A,0F,2F,8E, 9D,94,17,4E,4C 
1978 DATA GA, 9C,97,6E,9F,9C, 97, 0E, DB 
1989 DATA F5,F5,E4,99,7E,FA,FA,88,C8 
1899 DATA 7F,FD,F5,C4,3F,6F, 7A,8C, 99 
1199 DATA 5F,98,35,84,2F,8F,7E,8C,E8 
1119 DATA 5F,5F,EF,98,2F,AF,EF, 98,82 
1129 DATA 1F,5F,7F,98,8F,AF,BF,6C,SE 
1139 DATA 9F,98,57,CE,9B,98,27,CE, 44 
1149 DATA 8D,9F,5F,4E, SA, 9F,2F,6C,9D 
1158 DATA 89D,95, 17,08,0F,9F,9F,98,5E 
1169 DATA 31,F5,F5,90,37,FA,FA,88,CE 
1178 DATA 37,FF,FD,C4,3F,FF,FE,EA, 1D 
1189 DATA 5F,8F,7F,CE, 2F,8C, 37,80, 39 
1199 DATA 5F,98,93,96,2F,98,90,98, A9 
1269 DATA 1F,08, 89,09, 0F,08,08,09,3E 
1219 DATA 8B,0C,97,0C,8D,0F,5F,4E,F3 
1229 DATA 86,0F,8F,8E, 95,85,97,8C,CF 
1238 DATA 92,9A,9B,98,91,9F,9F,99,3E 
1249 DATA 72,FA,68,89,3F,F5,E4,99,0C 
1258 DATA 7F,FA,FA,08,3F,FF,FD,88,2E 
1269 DATA 5F,9F,FE,C8,2F,98,7F,C4,AE 
1278 DATA 5F,98,37,CE, 2F, 98,37, CE, AB 
1289 DATA 1F,98,13,CE, 8F,98,17,4E,B4 
1298 DATA 8B,08,27,8E, 8D,9F,5F,4C,4F 
1389 DATA 8A,0F,8F,6C, 8D,95,97,98,D5 
1318 DATA 8A,0A,9B,09,9F,0F,0C, 90,49 
1329 DATA 7E,FA,FA,EA,3F,F5,F5,E4,69 
1339 DATA 7F,FF,FA,EA,3F,FF,FF,EE, 8D 
1349 DATA 5F,8F,8F,8E, 2F,8C,99,89,C6 
1359 DATA 5F,5F,98,99,2F,AF, 98,98, AC 
1369 DATA 1F,5F,96,99, 8F,6F,96,099,2C 
1379 DATA 8B,89C,99,99,9D,0F,9F,9C,4E 
1389 DATA 9A,0F,89F,8E, 8D,95,05,8E,5B 
1398 DATA BA, OA, SA, SE, 8F,0F,0F,0E,67 
1499 DATA 37,F5,F5,E4,3F,FA, FA, EA, 22 
1418 DATA 7F,FD,F5,E4,3F,FF,FF,EE, 88 
1428 DATA 5F,6F,8F,0E,2F,8C,88,99,C6 
1439 DATA 5F,0C, 99,00, 2F,6F,98,68,31 
1449 DATA 1F,5F,88,89,8F,AF, 98,89, 4C 
1458 DATA 9B,9F, 96,99, 9D, 9C, 98, 98,38 


1469 DATA 9A,0C, 89,89, 90,94, 89, 09,27 
1479 DATA GA, 0C, 09, 08,9F, 8C, 99, 09,31 
1489 DATA 89, FD,E4,09,43,FA,FA, 88,68 
1409 DATA 37,FD,F5,C4, 37, FF,FF, EA, BC 
1589 DATA 5F,CF, 3F,CE, 2F,6C,43,0C, 95 
1518 DATA 5F, 98,99, 09, 2F, 98,97, 0C, Bi 
1529 DATA 1F,98, 36, CA, 8F,98, 37,C6,3B 
1539 DATA 8B, 00, 13,CA,9D,8F,3F,CE, 1D 
1549 DATA 86,1F,5F,CE, 85,97, AF, 8C,99 
1558 DATA 42,08,5F,98,01,0F,9F, 00,93 
1569 DATA 7E,C8, 75,E4, 7F, C4, 36, EA, 82 
1579 DATA 7F,C8,35,E4,3F, 60, 36,EA, 4B 
1589 DATA 5F, 80, 37,E4, 2F, 8C, 37, EA,E2 
1599 DATA 5F,0F,3F,CE, 2F,AF, FF, CE, 26 
1689 DATA 1F,5F,7F,CE, 8F,AF,BF, CE, 16 
1619 DATA 9B,0F, 1F,CE, 9D, 0, 27, CE, 15 
1629 DATA BA, AC, 17,4E, AD, 4,27, BE, 41 
1634 DATA GA, 00, 17,4E,0F,0C,07,0E, AB 
1649 DATA 49,72,FA,09,06,37,F5, 89,98 
1658 DATA 49,37, FA, 98,99, 37, FD, 08,65 
1669 DATA #9,17,FF, 09,06, 27,EF, 88, 2C 
1679 DATA 99,17,6F,98,98,27,AF, 08, 50 
1689 DATA 89,1F,4F,09,89,0F,AF, 49, 2C 
1699 DATA 99,08, 5F,98, 05,00, 8F, 08,96 
1746 DATA 89,04,8F,08, 86, 00,05, 48,38 
1719 DATA 49,0A,9A,08,99,0F,9F,98, 42 
1726 DATA 11,F5,F5,E4, 81, FA, FA, EA, BE 
1738 DATA 91,FF,FF,E4,81,FF,FF, EA, CC 
1749 DATA 81, 1F,EF,0E, 00,03,EF, 49,0F 
1758 DATA 99,13,6F,09,99,03,AF, 00, 34 
1769 DATA #9,13,4F,09,8E, 83, AF, 99, 22 
1778 DATA 9D, 03, 4F, 00, 94, 0F,9F, 08,87 
1789 DATA 8D,97,8E, 09, PA, OA, OA, 80,48 
1798 DATA 45,05, 84, 08,93, 0F, 08, 89, 28 
1889 DATA FA,C8,89,E4, 7D, C4, 18, EA EI 
1819 DATA 7F,C8, 13, E4,3F,8C, 36, EA, 29 
1829 DATA 5F,6C,7F,6C,2F,6F,FF,98,BB 
1838 DATA 5F,7F,EF, 06, 2F, AF, CE, 98, 79 
1849 DATA 1F,5F, 80,09, 8F, AF,8E, 89,D6 
1858 DATA 9B,0F, 4F, 09,40, 0F,9F, 98,90 
1868 DATA GA, 8D, 8F,8C, 8D, 54, PA, 9A,57 
1878 DATA 9A,0C,95,06,9F, 0C, 93, DE, 4D 
1889 DATA FA,C8, 80,98, 7D,C4,08,90,03 
1899 DATA 7E, C8, 99,08, 3F,C4,99,08, 49 
1989 DATA 5F,C8,98,89,2F, CC, 90, 99, 22 
1918 DATA 1F,4C,99,08,0F, CC, 08,88, 46 
1929 DATA 1F,4C, 98,88, 8F,CC, 80,09, 46 
1938 DATA 9B, 4C, 96,08, 9D,3F,F5,E4, 7C 
1949 DATA 8A,7F,FF, CE, AD, 27, AF,E, C7 
1959 DATA GA, OA, 84, 0A,0F,0F,0F, DE, 63 
1968 DATA F5,84,31,E4, 7E, C8, 36, EA, F$ 
1978 DATA 3F,EE, 7D,E4,5F,EF,FF, EA,C5 
1989 DATA 2F,FF,FF,CE,5F, 7F,FF,CE, A6 
1999 DATA 2F,BF,FF,CE, 1F,5F, 7F,CE, 86 
2808 DATA 8F,AF,AF,CE, 8F,0F,1F, dE, C6 
2818 DATA 9B,9D,97,6E, 9D, 8C, 87, 8E, DB 
2828 DATA 9A,8C,97,8E, 8D, 94, 85,06, 47 
2838 DATA 8A,0C, 96, 9A,8F,0C, 97,0, 56 
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2949 DATA F5,89,75,E4, 7E,C8,36,EA, 34 
2859 DATA 7F,CC,35,E4,3F,CE,37,EA, 92 
2969 DATA 5F,EF,37,CE, 2F,FF,3F,CE,BE 
2878 DATA 5F,7F,BF,CE, 2F,BF,FF,CE, 26 
2988 DATA 1F,5F,5F,CE, 9F,9F, AF, 8E, 06 
2898 DATA 9B,9F,5F,4E, 9D, 9D,9F,9E,FE 
2199 DATA GA, 0C,6F,0E, 4D,84,06,0A,54 
2118 DATA 8A,9C,95,06,9F,9C,97,0E,51 
2129 DATA 96,F5,E4,99,93,FA,FA, 88,58 
2138 DATA 37,FF,F5,C4,37,FF,FE,CB,EB 
2149 DATA 3F,CF,7F,C6,5F,8C,37,CE,43 
2158 DATA 2F,8C,37,CE,5F,0C,37,CE, 38 
2168 DATA 2F,80,37,CE, 1F,9C, 17, CE, DB 
2178 DATA 9F,8C,27,8E,9B,9F,5F,4E, 17 
2189 DATA 85,4F,0F,0C,06,9A,9B,9C,56 
2198 DATA 93,95,95,98, 98, 8F,9E, 98,32 
2268 DATA F5,F5,E4,99,7E,FA,FA, 88,C8 
2219 DATA 7F,FD,F5,C4,3F,FF,FE, C8, 39 
2229 DATA 5F,8F,7F,E6,2F,8C,37,CE, 13 
2239 DATA 5F,9F,7F,CE,2F,BF,FF,6C,34 
2249 DATA 1F,5F,7F,68C, PF, AF,AF,98,FE 
2259 DATA 9B,9F,9E,98,9D,0C, 98,98, 41 
2269 DATA 9A,6C, 99,00, 0D,04,09,99,27 
2279 DATA 9A,9C,99,90,9F,9C,98, 98,31 
2288 DATA 99,75,89,99,81,FA,EA, 99, DA 
2298 DATA 13,FD,F5,98,37,FF,FA, 88, BD 
2369 DATA 17,CF,FD,89,2F,8C, 7E, 8C, 28 
2318 DATA 5F,98,37,8C,2F,98,37,8C, 24 
2328 DATA 1F,98,37,8C,9F,98,27,8C,B4 
2339 DATA 9B,8C,5F,9C,95,9F,2F,80,51 
2349 DATA 86,0F,9F,0E,03,95,05, 06,45 
2358 DATA 91,9A,9F,9A,98,97,98,0E, 41 
2369 DATA F5,F5,E4,09, 7A,FA,FA,88,C4 
2378 DATA 7F,F5,F5,C4,7F,FF,FE,C8,71 
2389 DATA 7F,8F,7F,E6,3F,8C,37,CE,43 
2399 DATA 5F,6F,7F,CE,2F,FF,FF,8C,F4 
2499 DATA 5F,5F,7F,8C,2F,AF,AF,98,5E 
2418 DATA 89F,9F,4F,99,0F,9D,9F, 98, A8 
2429 DATA 8A,0C,8B,0C, 9D,84,95,66, 49 
2439 DATA 9A,0C,92,0A,9F,0C, 91, DE, 4C 
2449 DATA 89,F5,E4,99,13,FA,FA, 88,68 
2458 DATA 37,FF,FD,C4,37,FF,FE,C8,F3 
2469 DATA 3F,8F,3F,CE,5F,98,93,8C,D1 
2478 DATA 27,AF,88,98,17,5F,4E,99,2A 
2489 DATA 91,8F,AF,88,94,91,5F,4C,F7 
2499 DATA 9F,98,27,6C, SA, 0F, 1F,4E,58 
2598 DATA 85,97,9F,0C, 96,94, 9B,8C,4E 
2519 DATA 93,95,95, 98,98, 9F,9E, 99,32 
2528 DATA F5,F5,F5,E4,7E,FA,FA,EA, Î1F 
2538 DATA 7F,FF,F5,E4,5F,FF,FE,EA, 9D 
2549 DATA 2F,BF,FF,CE,8F,5F,CF,0E, 06 
2558 DATA 99,2F,CE,08,98,5F,4E, DB, AA 
2568 DATA 99,2F,8E,89,89,1F,4E, 99, 2A 
2578 DATA 99,0F,6E,90,9D,9B,4F,90,F7 
2589 DATA 91,05,8F,90,91,0A,6B, 99, 2B 
2598 DATA 81,85,95,90,91,9F,9F, 99, 2A 
2688 DATA 75,88, 32,C8, 7A,C8,35,E4, 4A 
2618 DATA 7F,C4,36,EA, 3F,8C,35,E4,47 





2629 DATA 5F,8C, 37, EA, 2F,8C, 37, CE, 4C 
2689 DATA 1F,90, 17, CE,#F,6C, 27, 8E,68 
2649 DATA 8B,8C, 17, 4E, 8D,8E, 2F,8E,54 
2658 DATA 9A,0F,5F,4E,95,07,0F, 8C, 6D 
2668 DATA 96,8,9F,8C,93,05,05, 08,48 
2678 DATA 91,94,08B,00,98,07,6C, 60, 29 
2688 DATA F5,88, 31,E4, 7A,C8, 36, EA,EC 
2698 DATA 7F,C4,35,E4, 7F, 80, 37, EA, 88 
2708 DATA 3F,8C, 37, EC, 5F,4C, 17, CE, 3E 
2719 DATA 27,6E,2F,8C,97,0E,5F,0C, FA 
2728 DATA 83,9F,AF,08,83,07,5F,08,3A 
2738 DATA 91,0B,0F,98,91,05,9F, 08, 38 
2748 DATA 89,04, 84,08, 80, 8D, 86, 99, 27 
2758 DATA 49,06, 9C, 08,98, 97,90, 99, 25 
2768 DATA F5,88, 31,E4, 74, C8, 36, EA, EC 
2778 DATA 7F,C4,35,E4, 7F, 8C, 37, EA, 88 
2788 DATA 3F,8C,37,EC,5F,4C, 37, CE,5E 
2798 DATA 2F,8C, 17, CE, 9F, 4E, 2F, CE, FA 
2809 DATA 8F,8E,5F,4E, 80, 8F,AF, 8E, 23 
2818 DATA 06,8F,1F,0C,05,05,0F, 0C, 65 
2828 DATA 86,84,9B,8C, 93,87, 00, 88,46 
2838 DATA 92,0C,06, 98,03, 09,93, 98, 33 
2849 DATA 72,08, 18,C8, 7,84, 13, E4,3E 
2858 DATA 7F,C8,36, EA, 7F, CE, 7F, EC, 1F 
2868 DATA 17,EF,FF,8C,93,BF,FF,98,5À 
2878 DATA 81,5F,6F,99, 08, 2F,8E, 9, 8C 
2689 DATA 69, 1F,4E,99,81,8F,0F, 40,8C 
2898 DATA 93,9F,0F,08,95,0F,0F, 0C, 58 
2969 DATA OA, 8A,0F,8E, 90, 84,05, 8E,55 
2918 DATA A,98,02,0A,97,08,81,0C, 32 
2928 DATA FA,89,11,E4, 70,88, 12, EA,FS 
2938 DATA 7E,88,13,E4,3F,6C, 37,EA,EQ 
2948 DATA 17,CE,7F,8C,87,AF,BF,8C, F1 
2958 DATA 93,5F,5F,98,91,2F, AF, 08, AB 
2968 DATA 99,0F,4E, 09,98, 87, 6C, 89,78 
2978 DATA 99,05, 0C, 00,98, 06, 8C, 68, 23 
2988 DATA 89,05, 04,00, 00,06, 0C, 00, 1B 
2998 DATA 99,85,84, 04,99, 07,8C, 08, 1C 
3908 DATA F5,F5,F5,E4,7F, FA, FA, EA, 28 
3418 DATA 7F,FF,FF,E4,5F,5F,FF, EA, 08 
3928 DATA 8F,0F,FF,EC, 98,13, 5F,8C, 07 
3438 DATA 99, 27,AF,98,08, 1F,4F, 9, 4C 
3949 DATA #1,8F,0E,09,83,0F,0C, 09, 3C 
3858 DATA 97,0F,98,98,9D,0F,0F,0C,55 
3968 DATA A, 8B,8F,0E, 8D,85,85,06,4F 
3878 DATA 9A,8A, 8, 0A,0F,0F,0F,0E,63 
3889 DATA 60,69,09,69,00,09,09, 00,08 
3498 DATA 99,09,98,00,00,08,05,09,08 
3198 DATA 99,09,00,00,09,09,09, 09,08 
3118 DATA 49,00,08,96,05,00,08,09,08 
3129 DATA 99,80,08,89,00,09,09,00,00 
3138 DATA 09, 66,09,09,08,00,08,09,08 
3149 DATA 68,09,80,09, 90,08, 09,00,08 
3154 DATA 09,06, 08,00,0P,08,98, 09,08 
3168 DATA 99,60,99,89,09,80,09, 99,08 
3178 DATA 99,89,96,09, 09,08, 68, 09,68 
3189 DATA 99,69, 09,00, 80,00,08, 09,09 
3198 DATA 69,09,00,09,06, 09,08, 99,98 


3286 DATA 89,09, 09,09, 99,09, 09,90,06 
3218 DATA 99,FA,C8,09,99, 7F,Eû, 08,25 
3220 DATA 49,2F, EA, 09, 09,9F,6E, 99,96 
3238 DATA 49,84,0E, 09,08, 0F,6E, 09,35 
3249 DATA 89,32, FA, 89,99, 13,F5, 99,34 
3258 DATA 99, 13,EE, 99,98, 27, 8€, 09,86 
3269 DATA #1,8F,8C, 09, 06,08, 08, 99,35 
3279 DATA 41,0E,09,00,98, 08,08, 00,8F 
3289 DATA 99,09, 69,09, 99,09, 00, 00,08 
3299 DATA 99,99,96,00,08, 08,00, 00,88 
3380 DATA 89,89, 00,09,09,09,00, 0,06 
3319 DATA 99, 09,96, 00,99,08, 0, 09,08 
3329 DATA 99,31,E4,09, 09,32, EA, 99,31 
3339 DATA 99,33,E4,09,98,13,EE, 98, 18 
3349 DATA 89,23, CE, 09,08, 13, 4E, 80,52 
3359 DATA 99, 23,6E, 99,08, 93, 4€, 08,92 
3360 DATA 89,93,8E, 09, 09,02, 0E, 90,21 
3379 DATA 99,93,0E,00,99,08,08,08, 11 
3388 DATA 49,89, 00,09, 00,03,0E, 90,11 
3399 DATA 99,02,04,09,08,03,0E, 69, 1D 
3480 DATA 48,F5,E4,89,81,FE, FA, BB, SA 
3419 DATA 13,FF,FF,C4, 27, 6F, 3F, CA, 94 
3429 DATA 17,80, 13,CE, 27,80, 13, 4E, 18 
3439 DATA 43,00, 27,8C,99,99, 1F,08,E9 
3449 DATA 98,81,8F,80, 00,02, 0€, 09, 28 
3458 DATA 49,93,0E,00,99,08,08,90, 11 
3469 DATA 49,80, 99,09, 80,03,0E, 90,11 
3478 DATA 46,02, 04,08, 08,03, 8E, 09, LD 
3489 DATA 99,09, 69,09, 80,80,00, 09,08 
3499 DATA 99,00,06,00,98,00,99,00,08 
3589 DATA 89,09, 09,09,89,00,00,09,06 
3519 DATA 49,31,E4, 09,98, 13,EA, 99, 12 
3529 DATA 99,13, 6€, 09, 49,93, 0E, 09,92 
3539 DATA 99,09,00, 00,08, 00,99, 09,09 
3549 DATA 89,83, 9E, 09, 99,02, 84,09, 1D 
3558 DATA 99,03,06,08,08,93,0E, 08, (A 
3569 DATA 99,F5, 88,80, 81,FA, 88, 09,F8 
3579 DATA 13,EF, 99,08, 13,EF, 99,09, 04 
3589 DATA 27,CE, 99,08, 17,4E, 90, 09,5A 
3599 DATA 2F,8C, 99,68, 5F, 4C, 0, 09, 26 
3689 DATA 2F,8C, 99,09, 8F,0C, 99, 09,D6 
3619 DATA 97,9E,08,08,97,0E, 0,09, 2A 
3629 DATA 92,08, 69,09, 83,85,00,08,15 
3638 DATA 81,04, 08, 08,08, 8F, 98,08, 2A 
3649 DATA 99,75, E4,98, 89, 36,EA, 09, 79 
3658 DATA 49,13, FD, 08,98, 13,FF, 98, 22 
3669 DATA 99,81, 7F,98,89,81,AF, 98,48 
3679 DATA 99,99,5F,0C, 99,98, 2F, BC, 26 
3689 DATA 89,09, 1F,0C,40,99,0F, 0C, 46 
3699 DATA 99,91,9F,08,98,91,9B, 98, 2C 
3789 DATA 99,03,85,99,80,82,08, 09,15 
3719 DATA 09,05,96,08,99, 97,0, 08, E 
3729 DATA 99,09,09,09, 90,00, 09, 09,08 
3736 DATA 89,00,08,08,00,90,05, 08,98 
3749 DATA 89,09, 90,09,80,00,00, 08,08 
3758 DATA 99,09,06,08,08,99,96, 08,08 
3768 DATA 86,09, 09,09,80,00,09, 08,08 
3778 DATA 99,19, FA, 98,68, 91, BD, 98, CB 
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3788 DATA 89,03, 4E, 09, 00,85, 6C, 08,62 
3798 DATA 89,98, 98,98,91,0E, 09,08, 22 
3898 DATA 96,09,89,06, 00,00, 00,06,08 
3818 DATA 89,09,09, 08,09, 08,08, 08,09 
3829 DATA 99,08, 89,00, 80,00,06, 09,08 


SRCTEX# 


ig Écoles dascressesen=s 
28 ' Createur de SCRTEX.BIN 


38 V nrmmmmmmmmmmmmmmmmmmm— 
48 lig=1989:sun-ÿ 
5ÿ FOR adr=&7989 TO K79FF STEP 8 
68 sun-f 
78 FOR dec=ÿ TO 7 
75 READ a$:a=VAL("&"+a$):POKE ad 
rtdec,a:sum=sun+a 
88 NEXT 
85 READ c$:1F VAL("k"+c$)>sum MOD 
256 THEN PRINT'Erreur ligne :";lig: 
STOP 
86 PRINT lig'is OK !";CHR$(13);:li 
g=ligt19 
98 NEXT 
95 SAVE"scrtex.bin",b,&7998,8&FF 
1899 DATA FE,92,C4,EB, 46,23,5E, 23,95 
1918 DATA 56,DD,6E, 92, DD,66,93,C5,AE 
1929 DATA E5,D5, 1A,D6,41,28,2C,E5,24 
1839 DATA 21,08,688,91,48,99, ED, 4A, 19 
1949 DATA 3D,29,FB,D1,86,19,EB,C5,EF 
1958 DATA E5,96,94,1A,77,13,23, 19,C6 
1969 DATA FA,E1,CD, DC, 79,C1,19,EF,B4 
1479 DATA D1,13,E1,23,23,23,23,C1,12 
1989 DATA 19,CD,C9,E5,21,49, 89,18, 44 
1998 DATA DA, 96, 00,00,08,00,99,90,DA 
1198 DATA 99,FE,92,C0,EB, 7E, 23,5E, AÀ 
1119 DATA 23,56, ED, 53,EA, 79,21,899,34 
1129 DATA CS,DD,46,92,85,28,95,CD,E4 
1138 DATA DC, 79, 19,FB, 22, ED, 78,96, DC 
1149 DATA F5,ED, 78,1F,39,FB,96,FF,A9 
1158 DATA 69, 09,08, 80,06, 09, 96, 09,98 
1169 DATA 99,99,19,F4,E5,E5, ED, 5B, 16 
1179 DATA EA, 78,14, 11,48,99,21,99,E6 
1189 DATA 89,D6,41,28,97,38,42,47,87 
1199 DATA ED, 54,19, FC,EB,96,94,E1,29 
1289 DATA C5,E5, 76,96, 19,C5,E5,D5,B5 
1218 DATA 86,4F,54,5D, 13, 1A, 77,13, BD 
1229 DATA 23,18,FA,D1,1A,77,13,13,B5 
1239 DATA 13,13,E1,CD,DC, 78,C1,19,F1 
1249 DATA E4,EB, 11,3F,99,ED,52,EB, 49 
1258 DATA Ei,C1, 18, D4, ED, 5B, EA, 79,28 
1268 DATA 13,ED,53,EA, 79,E1,18, AC,52 
1278 DATA C9,E1,E1,C9, 7C,C6,98,67,95 
1288 DATA E6,38,C8,D5, 11,59,C9, 19, ED 
1298 DATA D1,C9,FF,3F,98,98,C8,98,98 
1398 DATA 96,90,09,00,69,80,09,09,09 
1319 DATA 96,99,09, 99,08, 00,98,00,05m 


Fabien FESSARD Stéphane ST-MARTIN 





Revenant d’une mission des plus périlleuses, vous, 
Lucke Stormwalker, découvrez que votre planète a été 
détruite. Le monde le plus proche pour vous ravitailler 

est Âxys maïs il vous faudra traverser la frontière d’Aula 
où périrent plus d’un courageux guerrier. 

Arriverez-vous à défier les gardiens de cette terrible 

frontière, ou bien est-ce votre dernière bataille ? 


Ce jeu assez exceptionnel, comprend 
les caractéristiques suivantes : 

e présentation en overscan, 

e jeu en overscan vertical, 

. scrolling hardware, 

° armes et bonus, 

+ multitudes de vagues ennemies. 
















Pour le chargement, commencez par 
tapez les listings publiés et sauvez-les 
sous les noms indiqués en en-tête. La 
procédure de chargement vous sera 
indiquée lors de la dernière publica- 
tion. 
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18 ' DATASI AXYS 
29 ' 

38 HODE 2:AD=&CH08:NL=98 
49 FOR A=1 TO 619:B=9:FOR C=1 TO 15:READ A$ 

58 POKE AD, VAL("&"+A$) :B=B+PEEK (AD) :AD=AD+1 

68 NEXT:READ E$:1F VAL("&"+E$)CB THEN 89 

78 NLENL+18:NEXT: SAVE"START. AXS",B, &CO8B, &23B5:CLS : END 
88 CLS:PRINT"LIGNE"NL;" INCORRECTE": END 

98 DATA 21,91,6D,11,86,BE, 81,30, 89, D5, ED, B9, C9, 21,3E, 5B6 
198 DATA 6D,11,29,56,91,B7, 1D,ED, 43, A3,BE, 81, 19, 7F,F3, SDD 
119 DATA ED, 49, 7E,FE, 76,28, 1A, 12, 13,23,96, 7F,F6, 48, A8,68D 
128 DATA ED, 79,91,98,08,0B,ED, 43, A3,BE, 78,B1,28,ES,FB, 72C 
139 DATA C3,89,8F,23,7E, 23, 4E, 12, 13,9, 29,FB, 18,DD, 76,51C 
149 DATA C9,07,3C, 76,84,97,94,76,48,87,1C, 76,8C, 88, 76,479 
159 DATA 30,86, 4C, 4C, 76,3C, 96,8C,8C,64,64, 76,3, #4, 64, 48C 
169 DATA 64,98,98, 76,3C, 94, 98,98, 76,B9, 98, 76,F8, 88, 76,68C 
179 DATA C3,88,76,4B, 88,87, 87, 76,3C,94,87,87,5E,5E, 76,598 
189 DATA 3C,94,5E,5E, AD, AD, 76,30, 94, AD, AD, FC, FC, 76,30, 718 
199 DATA 94,FC,FC, 76,C9,97, 3C, 76,84,97,94, 76, 48,98, 76,646 
298 DATA 90,98, 76,30, 96,40, 4C,76,3C,86,8C,8C, 76,64,97,415 
219 DATA 34,76,98,47,3C, 76,B9,07,3C, 76,F8,97,B4,C3,C3,695 
228 DATA 76,3C,04,C3,C3,4B, 4B, 76, 3C, 84, 4B, 4B, 76,87,08,523 
239 DATA 76,5E, 88, 76, AD, 97, BC, 76,FC,97,3C, 3C, 76,C8,97,5F$ 
248 DATA 20, 76,84,87,68, 76, 48,97, 76,8C,98, 4C, C, 1C, 76, 49E 
259 DATA 30,85, 80, 8C, 9C, 76, 3C, 95, 64,64, 76,30, 96,98, 98,55€ 
268 DATA 76,30, 96,B9,B9, 76,3C,96,F8,F8, 76,3C,86,C3,C3,6EE 
279 DATA 96,76,3C,95, 4B, 4B, 1E, 76, 3C, 95, 76,87,98, 7C, 76, 4AF 
288 DATA 5E,97,2D, 76,AD,87,3C,76,FC,87,76,C9,87,3C, 76,568 
299 DATA 84,87,94,76, 48,97, 10, 76,9, 98, 76,3C, 96, 4C, 4C, 3DA 
398 DATA 76,3C,86,68C,6C,64,64,76,3C,84,64,64,98,98, 76, 5BC 
319 DATA 3C,84,98,98, B9, B9, 76, 3C, 84, BS, B8,F8,F8,76,3C, 778 
328 DATA 84,F8,F9,C3,C3,76,3C,84,C3,C3, 4B, 4B, 76,3C, 84, 6F2 
339 DATA 4B,4B,76,87,88, 76,5E, 97, 1E, 76, AD, 97,BC, 76,FC,5EC 
349 DATA 97,30, 76,C9,98, 76,64,98, 76,48, 98, 76, 8C, 86, 76, 449 
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359 DATA 30, 19, 76,64, 88, 76,98, 98, 76,88, 68, 76, FA, 8, C3, 543 
369 DATA C3,C3, 76,30, 85, 48, 4B,4B, 76, 30,95, 76,87, 88, 76,558 
378 DATA 5E,88, 76, AD, 88, 76, FC, 98, 76,C8, 88, 76, 84,98, 76,5C1 
388 DATA 48,98, 76,00, 88, 76, 3C, 19, 76,64,88, 76,98, 88, 76, 49A 
399 DATA 89,86, 76,F8,88,C3, C3, C3, 76, 3C, 5, 4B, 4B, 4B, 76,670 
488 DATA 3C,95,87,87,87, 76,3C,85,5E,5E,5E, 76, 3C, 85, AD, 598 
419 DATA AD, AD, 76,30, 85, FC, FC, FC, 76, 3C, 96, 76,C8, 87, 20, 726 
428 DATA 76,84, 87,68, 76, 48,87, 76,8C,8B, 4C, 4C, 1C, 76,30, 41E 
439 DATA 85, 8C, 8C, 90, 76,30, 85,64, 64, 3C, 3C, 76,64, 94,98, 526 
448 DATA 98,30, 3C, 76,98, 94, B8,B8, 3C, 3C, 76,89, 84, FO,FS, 754 
459 DATA 30, 30, 76,F8,#4,C3, C3, 96, 3C, 3C, 30,69, C3, 4B, 4B,674 
468 DATA 1E, 3, 3C, 30, 69, 4B, 76,87, 98, 70, 76,5E, 87, 20, 76, 485 
479 DATA AD, 97,30, 76, FC, 97,C8, CO, 76, 3C, 94, CB, CB, 84,84, 727 
488 DATA 76,30, 84,84, 84,48, 48, 76,30, 84,48, 48, C, 6C, 76, 422 
499 DATA 30, 84,80, AC, AC, 4C, 76,30, 04, 4C, 4C,8C,8C, 76, 3C, 498 
598 DATA 84,8C,8C,64,64,3C, 76,64, 85,98, 98, 3C, 76,98, 95, 57E 
519 DATA B9,B8, 30, 76,88,95,F#,F9, 3C, 76,FD,95,C3, C3, 76, B4A 
529 DATA 30,94, C3, C3, 4B, 4B, 76,3, #4, 4B, 4B, 87,87, 76, 3C, 568 
539 DATA 84,87,87,5E,5E, 76, 3C, 94,5E,5E, AD, AD, 76,30, 64,558 
549 DATA AD, AD, FC, FC, 76,30, 84, FC, FC, 3, 3C, 30, C9, CS, CS, 8F4 
559 DATA 76,3C,85, 84, 84,84, 76, 3C, 05, 48, 48, 48, 76, 3C, 65, 489 
568 DATA 8C,0C, 8C, 76,3C,15,64,64,64, 76, 3C, 95,98, 98,98, 496 
579 DATA 76,3C, 85,84, 89,4, 76,3C,05,F8,F8,FB, 76,30, 05, 785 
588 DATA C3,C3,C3,76,3C, 85, 4B, 4B, 4B, 76, C, 85,87, 87,87, 62D 
599 DATA 76,3C,85,5E,5E,5E, 76, C, 95, AD, AD, AD, 76, 3C, 85, 546 
689 DATA FC, FC, FC, 76,30, 46, CA, CB, CO, 76,30, 85,84, 84, 84, 82F 
619 DATA 76,30, 85, 48, 48, 48, 76, 3C, 95, 90, 8, 4C, 76, 30, 15, 331 
628 DATA 64,64,64,76,3C,95,98,98,98, 76, 3C, #5, 9, B, B9, 672 
638 DATA 76,30,85,F4,F8,F#, 76, 3C,05,C3,C3, C3, 76, 30,65, 73€ 
649 DATA 48,48, 4B, 30, 30, 76, 87,66, 30, 30, 76,5E, 85, LE, 3C, 497 
659 DATA 30,76, AD, 85, BC, 30, 3C, 76, FC, 85, 3C, 30, CB, CB, CA, 6C7 
668 DATA 30,30, CO, CA, CO, 84, 84, 84, 3C, 20, 84, B4, 84, 48, 48, 6CB 
679 DATA 48,30, 48,48, 48, 1C, BC, AC, DC, 3C, BC, 8C, BC, 3C, 4C, 284 
688 DATA 4C, 4C, 30, 4C, AC, 1C, 3C, BC, BC, BC, 3C, BC, 8C, 30, 3C, 534 
699 DATA 64,64,64,3C, 64, 34, 3C, 30,98, 98, 98, 30,98, 3C, 3C, 58C 
788 DATA 3C,B6, B9, BB, 3C, B9, 3, 3C, 3C, F8, F8, FO, 3C, F, B4, 69C 
719 DATA 30, 3C,C3,C3, C3, 3C, C3, C3, 3C, 3C, 4B, 4B, 4B, 3C, 4B, 663 
728 DATA 48, 1E,3C,87,87,87,3C,87,87,87,3C,5E,5E,5E, 3C, 59D 
739 DATA 5E,5E,5E, 1E, AD, AD, AD, 3C, 2D, AD, AD, AD, FC, FC, FC, 8A3 
748 DATA 30,30, FC, FC, FC, CB, CA,C8, 76,30, 05,84, 84,84, 76,865 
759 DATA 30, 85,48, 48,48, 76,3C, 45,40, 8, 8C, 76, 0,95, 4C, 2FT 
768 DATA 4C, 4C, 76,30, 85,80, 8C, 80, 76,3C,85,64,64,64, 76, 54C 
718 DATA 3C,85,98,98,98, 76, 3C, 95, B9, BE, B9, 76, 3,95, FA, 677 
788 DATA F8,F8,76,3C,05,C3,C3,C3, 76,30, 05, 4B, 4B, 4B, 76,6EE 
799 DATA 30,85, 76,87, 88, 76,5E, 98, 76, AD, 98, 76, FC, 98, 76, 53D 
848 DATA CB,97,3C, 76,84,97,94,76, 48,87, 1C, 76,8C, 88, 4C, 44F 
819 DATA 4C,76,3C, 84, 4C, 4C, BC, BC, 76, 3C, 84,8, 80,64, 64,548 
829 DATA 3C,64,64,3C,64,64, 98,98, 3C, 98, 98, 3C, 98,98, B9, 6C8 
839 DATA B9,3C,B9,B9, 3C,BS,B9,F#,F9,3C, FD, F8, 0, FE, FO, A69 
849 DATA C3,C3,3C,C3,C3, 30, C3,C3, 4B,4B, 3C, 4B, 4B, 3C, 4B, 6FQ 
858 DATA 48,87,87,3C, 87,87, 3C,87,87,5E,5E, 3C,5E,5E, 3C, 50D 
868 DATA 5E,5E, AD, AD, 3C, AD, AD, 3C, AD, AD, FC, FC, 3C, FC, FC, 96E 
879 DATA 3C,FC, FC, 76, C9, 47, 3C, 76,84,07,94, 76, 48,97, 1C, 623 
888 DATA 76,80, 88, 4C, 4C, 76,3C, #4, 4C, 4C, BC, 8C, 76, 3C, 94, 43E 
899 DATA 8C,8C,64,64, 76, 3C, 94,64,64,98,98, 76, 3C, 94,98, 5DC 
988 DATA 96,B8,B9, 76, 3C, 64, 84,88, F9, F8, 76, 30,94, FO, F8, 884 
919 DATA C3,C3,76,3C,84,C3, C3, 4B, 4B, 76, 3C, 94, 4B, 4B, 87,628 
928 DATA 87,76, 3C,94,87,87,5E,5E, 76, 3C,84,5E,5E, AD, AD, 5D3 
939 DATA 76,3C, 94, AD, AD,FC, FC, 76, 3C, 94, FC, FC, 80, 76, CB, 828 


949 DATA 96, 3C, 2C, 76,84, 96, 94,68, 76,48, 96, 1C, 76,8C, 98, 3D4 

959 DATA 4C,4C,1C,3C,3C,6C, 4C, 4C, BC, BC, 9C, 3C, 3C, 2C,8C,514 

969 DATA 8C,64,64, 76,3C,94,64,64,98,98, 76, 3C, 94,98, 98, 5E8 

979 DATA B8,B9,76,3C,84,B9,B9,F9,F#, 76, 3C, 94,F8,F8,C3,8AF 

988 DATA C3,96,3C,3C,69,C3,C3,4B, 4B,1E,3C, 3C,69, 4B, 4B, 5EB 

998 DATA 76,87,88, 7C, 76,5E, 96, 1E, 2D, 76, AD, 96, BC, 3C, 76, 53D 

1999 DATA FC,86,3C, 76,C9,87,3C, 76,84,97,94,76,48,97,1C,52D 
1819 DATA 76,9C,98, 4C, 4C, 76,30, 94, 4C, 4C,8C, 8C, 76, 3C, 94, 43E 
1929 DATA 8C,8C,64,64, 76,3C,94,64,64,98, 98, 76, 3C, ÿ4,98, 5DC 
1935 DATA 96, 76,B8, 98, 76,F8,97,B4, 76,C3,87,96,76,4B,97,685 
1949 DATA 3C,67,87,76,3C, 96,5E,5E, 76, 3C, 96, AD, AD, 76, 3C, 582 
1855 DATA 86,FC,FC, 76,3C,97, 76,C8,96,3C,2C, 76,84, 86,94, 5EF 
1969 DATA 68, 76,48,97,76,8C,48,4C,4C,1C,3C, 3C,6C, 4C, 4C, 3E7 
1978 DATA 8C,8C,9C,3C, 3C, 20, 8C,8C,64,64, 76,30, 84,64,64,5B6 
1989 DATA 98,98, 76,3C,94, 98,98, B9, B9, 3C, 3C, B9, B6, 38,B9, 736 
1898 DATA F#,F#,3C,3C,F8,F8,B4,F8,C3,C3,96,3C,C3,C3,C3, A7D 
1199 DATA 69,4B,4B, 1E,3C, 4B, 4B, 4B, 1E, 76,87,04,2D,87,87, 494 
1119 DATA 87,7C,5E,5E,5E, 1E,5E,5E,5E, 20, 76, AD, 84, 2D, AD, 583 
1128 DATA AD,3C,76,FC,94,BC,FC, FC, 76,C9,07,3C, 76,84,97, 78D 
1138 DATA 94,76,48,97, 1C, 76,0C,98,76,3C,86,4C, 4C, 76,3C, 481 
1149 DATA 96,8C,8C,64,64, 76,3C, 94,64,64,98,98, 76,3C, 94,544 
1159 DATA 98,9, 76,B8,97,B4, 76,F8,97,3C, 76,C3,86,96,3C,6CF 
1169 DATA 76,4B,97,3C,87,87,3C,3C,2D,87,87,96,5E, SE, 3C, 553 
1178 DATA 3C,3C,5E,5E,5E, AD, AD, 3C,3C,3C, 2D, AD, AD, FC, FC, 71F 
1189 DATA 76,3C,84,FC,FC, 3C, 76,C8,96,3C, 2, 76,84, 96,94, 622 
1199 DATA 68, 76,48,96, 1C, 76,9C, 88, 76, 4C,84,3C, 3C, 4C, 4C, 3A8 
1299 DATA 2C,8C,8C, 8C,9C, 3C,8C, 8C,3C,6C,64, 64,64, 76,3C,646 
1219 DATA 85,98,98,98,9C, 76,30, 94,38, B8,B9,B9, 76,3C,95,61E 
1225 DATA F8,F8,F9,B4,3C,C3,C3,3C,69,C3,C3,C3,96, 4B, 4B, 968 
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1238 DATA 30,3, 76,48, 94, 76,87, 68, 7C, 76,5E, 86, LE, 20, 76, 459 
1248 DATA AD, 96, BC, 3C, 76, FC, 6, 3C, 3C, 76, CA, 7, 3, 76,84, 60E 
1258 DATA 87,30, 76,48,07,3C, 76,80,87, 76,30, 12,64,64,64, 3BD 
1268 DATA 76,3C,85,98,98, 96, 76, 30,95, B8, ES, B9, 76, 3C, 05, SFD 
1278 DATA F0, F#, F9, 76,3C,05,C3,C3,C3, 76, 30,85, 4B, 4B, 4B, 768 
1288 DATA 76, 30,85, 76,87,85,3C, 3C, 3C, 7C, 76,5E, 94, 30, 3C, 439 
1298 DATA 30, 20, 76, AD, 94, 76,30, 84,76, FC, 94, 30, CO, CO, 76,5EE 
1398 DATA 3C,84,C9, CP, 84, 84, 76, 3C, 04, B4, B4, 48, 48, 76, 3C, 5CB 
1318 DATA 94,48,48,0C, 0, 76, 0,4, AC, 4C, 4C, 4C, 76, 3C, 94, 2C8 
1328 DATA 4C, 4C,8C, 8C, 76, 3C, 84, BC, BC, 64, 64, 76,30, 04,64, 569 
1338 DATA 64,98, 98, 76, 3, 94, 98,98, B8, BB, 76, 3C, 84, B9, BO, 6FP 
1348 DATA F8,F9,76,3C, 84, F8,F9,C3, C3, 76, 3C,84,C3, C3, 4B, 883 
1358 DATA 4B, 76,3C, 94, 48, 4B, 76, 87,98, 70, 76,5E, 87, 2D, 76, 496 
1368 DATA AD,97,3C,76,FC,07,C9,C9, 76,3C,94, CB,CO, B4,84, 727 
1378 DATA 76,3C,04,84, 84, 48,48, 76, 3C, 84,48, 48, 6C, EC, 3C, 3EB 
1388 DATA 3C, 3,20, AC, AC, AC, 4C, 3C, 3, 3C, 4C, 4C, 4C, BC, BC, 484 
1398 DATA 3C,3C, 2C,8C,8C,8C, 64,64, 3C, 30,64, 64,64, 34,98, 588 
1499 DATA 98, 3C,38,98,98, 98, 3C, B9, B, 3C, B9, BO, BB, B4, 3C, 7AC 
1418 DATA F9,F8,78,F8,FB,FD, 0, 3C, C3,96,C3,C3, C3, 96, 3C, A14 
1428 DATA 3C,4B,69, 48, 4B, 4B, 3C, 3C, 3C, 96,87, 87,87, 96, 3C, 582 
1438 DATA 3C,3C, 7C,5E,5E,5E, 76, 3C, 84, AD, AD, AD, BC, 76, 3C, 639 
1448 DATA 84,FC,FC, FC, 76, 30,95, C8, CB, 76,30, 04, C8, CO,84, 7E9 
1458 DATA 84,76, 3C,94,84,84,48,48,3C, 48,48, 30,48, 48, C, 476 
1468 DATA 4C, 3C, BC, BC, 3C, BC, AC, 4C, 4C, 3C, AC, 4C, 3C, 4C, 4C, 2F4 
1478 DATA 8C,8C, 3C, BC, BC, 3C, BC, 8C, 64,64, 3C, 64,64, 3C, 64, 620 
1488 DATA 64,98,98, 3C, 98,98, 3C, 98, 98, B9, B9, 3C, B8, B9, 3C, A4 
1498 DATA B9,B8,F8,F8,3C,FB,F8,3C,FB,FB,C3, C3, 3C,C3, C3, ACS 
1598 DATA 3C,C3,C3, 48, 4B, 30, 4B, 4B, 3C, dB, 4B, 76,87, 8, 76,577 
1518 DATA 5E,97, E, 76, AD, 97, BC, 76,FC, 87,3, C9, C9, 76, 3C, 658 











1528 DATA 84,C8,C, 84,84, 94, 3C, 3C, 2C, 84, 84, 48, 48, 48, 3C, 5E8 
1539 DATA 30,48, 48,48, 8C,8C,8C, 10, 2C, 80, BC, AC, EC, 76, 4C, 2D2 
1549 DATA 86, 10, 3C, 76,80, 96, 3C, 3C, 60, 76,64, 4, 34, 3C, 3C, 3D4 
155$ DATA 30, 76,98,94, 76,30, 94, 76,B8, 84,30, 3C, 3C, 78, 76, 4D8 
1569 DATA F,84,B4,3C, 3C, 76,C3, 86, 3C, 69, 76, 4B, 96, 1E, 87,578 
157$ DATA 87,87,96, 20, 87,87,87,5E6,5E,5E, 3C, 30, 5E, 5E, 5E, 612 
1589 DATA AD, AD,BC, 3C, 3C, 2D, AD, AD, FC, FC, 76, 3C, 94, FC, FC, 8BB 
1598 DATA C#,Cf, 76,30, 04,C8, CB, 84,84, 76, 3C, 94, 84, 84, 48, BC4 
1689 DATA 48, 76,30, 04,48, 48, 8C, 8C, 76, 3C, 94, 8C, AC, 4C, 4C, 38C 
1618 DATA 10,30, 3C,6C, 4C, 4C, 8C, 8C, 9, 3C, 3C, 2C, BC, 8C, 76, 57E 
1629 DATA 64,88, 38, 76,98, 96,9C, 36, 76, B9, 96, B4, 3C, 76,F8, 60E 
1639 DATA 86, 76,30, 0C, 4B, 4B, 76, 3C, 96, 87,87, 76, 3C, 86,5E, 436 
1649 DATA 5E, 76,30, 86, AD, AD, 76, 30,96, FC, FC, 3C, 3C, 3C, 76, 64A 
1659 DATA CP,88, 76,84, 98, 76,48, 08,76, 00,08, 76, 30, 14,64, 444 
1669 DATA 64,64, 76,30, 94, 38,98, 98,98, 76, 3C, 54, 8, BO, BB, 644 
1678 DATA B4,3C, 30,3, 78,F8, F8, F8, 76, 3C,84,C3,C3, C3, 96, 845 
1689 DATA 3C, 3C,3C, 69, 4B, 4B, 4B, 76,30, 4, 76, 87,47, TC, 76, 4AA 
1699 DATA 5E, 47, 76, D, 98, 76,FC, 98, 76, 3,53, 3F, 3F, 3F, 76,542 
1789 DATA 3C,85,BF,BF,BF, 76,30, 85, 7F, 7F, 7F, 76,3C, 95, BB, 624 
1718 DATA BB, BB, 76,30, 95, 77,77, 77,76, 30,95, 33, 33,33, 76,558 
1729 DATA 30, 44,89, B8, B9, 76,3, 85,F8, F8, F8, 76,30, 05, 3F, 78D 
1739 DATA 3F,9F, 76,30, 95, BF, BF, BF, 76, 30,04, 76, 7F, 84, 76,597 
1749 DATA 3C,94,BB, BB, BB, BE, 76, 3C, 4, 77, 77, 77,36, 76, 30, 632 
1758 DATA 94,33, 33,33, 76,3C,95, 76,C8,85,3C, 30, 2C, 76,84, 42D 
1769 DATA 85,94, 30,68, 76, 48,45, 1C, 3C, 4C, AC, 8C, 3, C, GC, 2D9 
1778 DATA 4C,3C, 4C, 4C, 4C, 3C, 4C, 4C, 4C, 30, 8C, 8C, BC, 20, BC, 4E4 
1789 DATA 8C,8C,76,3C,84,64,64,64, 34, 3C, 3C, 3C, 38,98, 98, 54A 
1798 DATA 96,76, 3C, 94, BB, BB, BB, B4, 76, 30, 84, F9, F9, FO, 76, BGE 
1888 DATA 3C,15,7F,7F, 76,30, 06, BB, BB, 76, 3, 86, 77, 77, 76,599 
1818 DATA 3C,96, 33,33, 76, 30, 57, 3F,3F, 3F, 76, 3C, 85, BF, BF, 4A3 
1829 DATA BF, 76,30, 85, 7F, 7F, 7F, 76,30, 95, BB, BB, BB, 76, 3C, 68D 
1839 DATA 95,77, 77,77, 76,30,05, 33,33, 33, 76,3C,85,C8, C8, 4F1 
1849 DATA CB, 76,30, 95,84, 84,84, 76,30, 95, 48, 48, 48, 76, 3C, 544 
1858 DATA 95,4, 4C,0C, 76,30, 95, 4C, 4C, 4C, 76, 30, 85, 8C, 8C, 393 
1868 DATA 8C, 76,3C,85,64,64, 64, 76,30, 05,98, 98,98, 76, 3C, 5AB 
1878 DATA 95,86, 89, B9, 76, 30,95, F8, FA,F8, 76,30, 15, 7F, 7F, 761 
1888 DATA 7F,76,3C,95,BB, BB, BB, 76,30, 45, 77, 77, 77, 76, 30,635 
1898 DATA 45,33, 33,33, 76,30, 95, C8, CB, CB, 76,30, 84, 20, 84, 4FB 
1988 DATA 84,84, 76,30, 84,68, 48, 48, 48, 76,3, 84, 76, 8C, 04, 43A 
1918 DATA 76,3C,94,4C, 4C, 76,30, 96, 8C, 8C, 76,30, 86,64, 64, 49E 
1929 DATA 76, 30,86, 98,98, 76, 3C, 86,84, BB, 76, 3C, 06, FO, FA, 698 
1938 DATA 76,3C,86,3F,3F, 76,3, 96, BF, BF, 76, 30, 86, 76, 7F,519 
1949 DATA 84, 76,30, 84, 39, BB, BB, BB, 76, 3C, 94, 7D, 77, 77, 77, 5BC 
1958 DATA 76,3C,95, 33,33, 33, 76,30, 84,C8, CO, CE, 76, 3C, 85, 4FD 
1969 DATA 84,84,84,94, 76, 3C, 04, 48, 48, 48, 1C, 76,30, 04, 76, 4F6 
1978 DATA 4C, 04, 76,30, 96, 4C, 4C, 76,30, 66, 80, 8C, 76, 30, 86, 3E8 
1989 DATA 64,64, 76,30, 06,98, 98, 76, 3C, 96, B8, BG, 76, 3C, 96, 588 
1998 DATA F#,F#, 76,30, 06, 9F,9F, 76,30, 96, BF, BF, 76, 30, 84, 682 
2899 DATA 76,7F,64,76,3C, 84, BB, BB, BB, BE, 76, 3C, 94, 77, 77,642 
2818 DATA 77,36, 76,30, 64,33, 33, 33,76, 3,06, C9, C8, CO, 76, 56A 
2828 DATA 3C,85,84,84, 84, 76,3C, 05, 48, 48, 48, 76, 30,85, 0C, 41F 
2839 DATA 8C, 4C, 76,30, 94, 76, 4C, 64, 76, 30, 84, 8C, BC, 8C, QC, 48A 
2849 DATA 76,3C,84,64,64,64, 34, 76, 3C, 84,98, 98, 98, 76, 3C, 546 
2858 DATA 44,76,C9,06, 3C, 2C, 76, 84,06, 94,68, 76,48, 86, 1C, 4C4 
2868 DATA 76,8C,88, 4C, 4C, 4C, 3C, 30,60, 4C, 4C, BC, BC, BC, 9C, 52A 
2878 DATA 3C,2C,8C,8C,64,64,60, 64, 30, 3C,64, 64,98, 98, 3C,5C4 
2888 DATA 98,9C,3C,98,98, B8, B9, 3C, 38, B9, 3C, B9, B8, FO, F8, BAG 
2899 DATA 3C,3C,F9,B4, F8, F8, 9F, 9F,3E, 3C, 30, 3F, 3F,3F, BF, GAD 
2198 DATA BF,BE,3C, 3C, BF, BF, BF, 76, 7F, 88, 30, 76, BB, 86, BE, 75D 


Ÿ 2118 DATA 7D, 76, 77,96,36,3C, 76,33,96, 76,3C,84,C9,C9,C9,587 
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2129 DATA 76,3C,05,84,84, 84, 76,3C,94, 76,48, 04, 76, 3C, 84, 471 
2136 DATA 76,9C,04, 76,30, 04, 76, 4C, 84, 76,30, 84, 76, 8C, 84, 3BE 
2148 DATA 76,30,95,64,64,64, 76, 3,05, 98,98, 98, 76, 3C, 05,519 
2158 DATA B,B9,B6, 76,3C,95,FA,F8, F8, 76,30, 05, 3F,3F, 3F, 788 
2168 DATA 76,3C,85,BF,BF,BF, 76, 3C, 05, 7F, 7F, 7F, 76, 3C, 95, 5DF 
2178 DATA BB,BB, BB, 76,3C, 45, 77, 77, 77, 76,30, 85, 33, 33, 33, 59D 
2188 DATA 30,30, 76,C9,87, 3C, 76, 84,97, 94, 76, 48,97, 1C, 76, 4DD 
2198 DATA 8C, 98, 76,3C, 96, 4C, 4C, 76, 3C, 96,80, 9, 3C, 30, 76, 432 
2208 DATA 64,85, 34, 30,36, 76,98, 85, 3C, 3C, B#, BE, RS, B4, 76, 5D6 
2218 DATA 3C,94,F8,F8,FB, 76, 3C, 14, 76, 7F,08, 76, BB, 88, 76,662 
2228 DATA 77,88,76, 33,08, 76,9, 88, 76, 84,98, 76, 48,98, 76, 4AC 
2238 DATA 8C, 98, 76,30, 13, 76,64, 94, 30, 30, 3C, 36, 76,98, 94, 385 
2248 DATA 9C,3C,3C, 76,89, 95, B4, 3C, 3C, 76, F4, 66, 76, 3C, 06, 58F 
2258 DATA 3F,3F,76,3C,06, BF, BF, 76, 7F, 98, 76, BB, 87, BE, 76,61D 
2268 DATA 77,87,36, 76,33, 97, 3C, 30, 3C, 76, CB, 84, 30, 3C, 30, 496 
2278 DATA 20, 76,84,84,3C, 30, 3, 76,48, 84, LC, 30, 3C, 2C, 76, 3D6 
2288 DATA 8C,84,3C, 30, 3C, 76, 4C, 84, 1C, 30, 3, 3C, 76, 80, 44, 360 
2298 DATA 76,3C,94, 76,64, 68, 76,98, 08, 76,B8, 98, 76, F9, 08, 54A 
2388 DATA 76,3C,14,7F,7F, 7F, 76, 3C, 95, BB, BB, BB, 76, 3C, 95, 5E2 
2318 DATA 77,77,77,176,3C,95, 33, 33, 33, 30, 76, C8, 88, 76, 84, 529 
2328 DATA 98, 76,48,88,76,4C, 08, 76,30, 19, 76,64,97, 3C, 76, 3AD 
2338 DATA 98,97, 9C, 76,88, 97, B4, 76, F8, 98, 76, 3C, 96, 3F, 3F, 5CB 
2348 DATA 76,3C,66,BF,BF, 76, 7F, 98, 76, BB, 97, BE, 76, 77,97, 61D 
2358 DATA 36, 76,33,97,3C, 30, 76,C8, 97, 20, 76,84, 87,68, 76, 4AG 
2368 DATA 48,87,76,8C,B8, 4C, 4C, 4C, 76, 3C, 85, BC, 8C, BC, 76, 48E 
2378 DATA 30,95, 76,64,97,3C, 76,98, 97, 9C, 76, B8, 87, B4, 76,566 
2388 DATA F8,88,3F,3F,9F, 3C, 3C, 3C, 9F,3F, BF, BF, BF, 3C, 3C, 59C 
2398 DATA 3C,BF,BF, 76, 7F, 98, 39, 76, BB, 96, BE, 70, 76, 77, 86,655 
2499 DATA 36,30, 76, 33,06, 3C, 76,C8, 98, 76,84, 88, 76, 48,08, 463 
2418 DATA 76,8C,98, 76,3, 15,64,64,64, 76, 3C, 85,98, 98, 98, 4FC 
2428 DATA 76,3C,95,B9,B9,B9, 76, 3C, 85, F8, F8, F8, 76, 3C, 85, 705 
2438 DATA 3F,3F,3F, 76,3C, 95, BF, BF, BF, 76, 3C, 85, ?F, 7F,7F,5E5 
2449 DATA 76,3C,85,BB,BB, BB, 76,3, 45, 77, 77, 77,76, 30,05, 5EB 
2458 DATA 33,33, 33,30, 76,C8, 96, 30, 20, 76,84, 86,94, 68, 76, 4EB 
2469 DATA 48,86, 1C, 76,80, 98, C, 4C, 1C, 3, 3C, 6C, 4C, 4C, 2C, 358 
2478 DATA 8C,9C, 3C, 3C, 20, 8C,9C, EC, 76,64, 96, 34, 3C, 76, 98, 5BE 
2488 DATA 96, 3C,3C, 76,89, 96, 3C, 78, 76,F8, 96, B4, 3D, 3F,3E, 538 
2498 DATA 3C, 3C, 30, 3F, SE, BF, BF, BE, 3C, 3C, 30, BF, BF, 76, 7F,696 
2598 DATA 98,39, 76,BB, 06, BE, 70, 76, 77,06, 36, 3C, 76, 33,96, 4C7 
2518 DATA 3C,3C, 76,C8,96, 3C, 20, 76,84, 96,94, 68, 76, 48, 06, 4DC 
2528 DATA 10, 76,80, 8, 4C, 4C, 76, 3C, 84, AC, 4C, 8C, BC, 76, 3C, 456 
2538 DATA 94,80, 8C, 76,64, 98, 38, 76,98, 97,38, 76, BB, 87, 3C, 4EC 
2548 DATA 76,F0,07,76,3C, 96, 3F,3F, 76, 3C, 06, BF, BF, 76, 7F, 5CE 
2558 DATA 98, 76, BB, 97, BE, 76, 77,97, 36, 76,33, 87, 76, 30, 81,588 
2568 DATA 76,89,51,76, 30, 4E, 08, 09, 78, 76,F8, 4C,B4, 00,08, 4A5 
2578 DATA 78,76,CC,4C,B4, 98,00, 78, 76,00, 4C, B4, 99, 89, 78,52€ 
2588 DATA 5C,76,FC, 4A, AC, B4, 89,09, 78,5C, 76, FC, 4A, AC, B4, 768 
2598 DATA 89,08, 78,50, 76,FC, 4A, AC, B, 88,80, 78,5C, 76, FC, 636 
2698 DATA 4A,AC,B4,8,80,78,5C, 76, FC, 4A, AC, B4,08, 9, 78,612 
2618 DATA 5C, 76, FC, 4, AC, B4,08, 68, 78,5C,76,FC, 11, 74, FC, 73F 
2628 DATA B8,76,FC, 36, AC, B4, 98,99, 78,5C, 76, FC, 11,FB, FC, B8B 
2638 DATA F4,76,FC, 36, AC, B4, 98,68, 78,50, 76, FC, 12, 30, 76, 786 
2648 DATA FC, 37, AC, B4, 89,98, 78,50, 76, FC, 12, 76, 3, 05, B4, 656 
2658 DATA 78,F4,76,FC, 38, AC, B4, 88,08, 78,5, 76, FC, 11,FB, 7BD 
2668 DATA BC, A4, 76,8C,85, 16, 76, FC, 3, AC, B4, 9, 08, 78,5C, 5D5 
2678 DATA 76,FC, 11,74, BC, 1C, 76,4C,95, 38,76, FC, 39, AC, B4, 698 
2689 DATA 89,98, 78,50, 76,FC, 12, BC, 5D, 39, 24, 18, 9C, OC, AE, 4A3 
2698 DATA 74,76,FC,2F, AC, B4,98, 68, 78,5C, 76, FC, 12,FB, 76, 73B 








2798 DATA 34,06,B8, 75,76, FC, 2F, AC, B4, 99, 09, 78,5C, 76,FC,6A2 
2718 DATA 12,F8, 76,F8,97,75,56,76,FC, 11,88, FC, FC, 74, 76,85F 
2728 DATA FC, 19, AC, B4,99, 89, 78,50, 76,FC, 13, 76,FF, 05, FA, 742 
2738 DATA F9,75,93,76,FC, 12,F4,F8, 76,FC, 1A, AC, B4, 99,89, 7C4 
2748 DATA 78,50, 76, FC, 14, 9,93, 93, 93, 12, B8, 75,03, 76, FC, 5BB 
2758 DATA 12,BC, 7C, 76, FC, 1A, AC, BA, 08,80, 78,5C, 76, FC, 14,698 
2768 DATA A9, 93,83, 93,52, 39, 5D, 43, B4, 30, 76, FC, 94, 30, 78, 4AE 
2778 DATA FC,F, 30, TC, FC, FC, F8, 3, F4, FC, BC, 78, B4, 3C, 78, A58 
2788 DATA FO,B4,76,FC, 15, AC, B4, 98, 99, 78,50, 76, FC, 12, BC, 79F 
2798 DATA 3C, 29,93, 03,93, 12,80, D5,83, 8C, 40, 7C, FC, FC, BC, 4AC 
2888 DATA 8C,AC,FE, AC, C, F4, FC, FC, BC, 8C, 8, FE, B4, 58, 76, 76E 
2818 DATA 4C,05,F4,76, FC, 14, AC, Bû,88,08, 78,50, 76, FC, 12,643 
2828 DATA EB, AC, 29, 93,43, 53,96, 48, D5, 83, 1C, CC, B4, FC, FC, 5E8 
283 DATA 20,18, 38,FE, 9C, CC, 7C, FC, FC, BC, 18,60, BA, 20, 20, 7AB 
2848 DATA A4,76,8C,04,58,76,FC, 14, AC, B4, 08, 99, 78, 5C, 76, 5B2 
2858 DATA FC, 12,E8,84, 7C,93,93,93,96,48,FF, 3, DD, F9,E4, 799 
2869 DATA 7C,BC,FA,F8,FA,FE, F5, CC, 7C, FC, FC, BC, CC, EE, FE, CBO 
2878 DATA 44, BA, 39, 24, 39,00, 34,0, 76,FC, 14, AC, B4, 80, 09,514 
2889 DATA 78,50, 76, FC, 12,E8, C4, 76, 3C, 04,68, C9,FF,93,EE, 7CE 
289 DATA D8,CC,58,E4, CC, D8,DD, FC, FA, A4, 7C,FC, FC, BC, F9, C11 
2998 DATA 79,FE, BA, 36,89, 39,FF,FF, DD, 39, 76, FC, 14, AC, B4, 929 
2918 DATA 99,08, 78,50, 76,FC, 12,FD,EA, 76,C8,85,FF,FF, 03, 77B 
2928 DATA 57,CC,8C, AC, 8C, AC, 4C, FE, 03, CC, F8, 3C, 3C, FB, 3C, 688 
2938 DATA 79,F8, AB, 57,B8,F8, BB, 29,57,FA,B8,43,76,FC, 13, B5A 
2948 DATA AC, 4,98, 86, 78,5C, 76, FC, 12, FD, 76,FF,96,EA,FF, 819 
295 DATA 93,43, EA,84, 80, 0C, CB, D5, A9, 83, 4C, CC, 8C, 4C, CC, 649 
2968 DATA 4C,CC, BC, AB, 83, FA, DB, CC, 9C, 93, FF, FF, 93,56, 76, 7DC 
2978 DATA FC, 12, AC, B4, 99, 98, 78,5, 76,FC, 12, FD, 76, C9, 87, 760 
2984 DATA FF,93,83,FD,EA, CO,48,D5,FE, 83,03, CO, 84, 48, CB, 819 
2998 DATA 84,48, 00,C9, AB, 93,57, 4C,8C, 8, A1, 76,83, 4, 76, 495 
3899 DATA FC, 12, AC, B4, 99, 99, 78,50, 76, FC, 12, EB, 84, 76, 0C, 6B4 
3818 DATA 95,48,D5,93,03,FD, 76,FF,44,AB,63,83,FF,FF,C9, 70D 
3929 DATA FF,FF,C4,FF,D5, 93,93,56, AE, 84, 48, DB, 76,03, 44, 785 
3838 DATA 76,FC, 12, AC, B4, 68,08, 78,50, 76, FC, 12,EB, 8C, 8C,6BC 
3849 DATA 4C, 4C,8C, AC, 8C,D5, 43,03, F8, EA, CB, CB, CB, A1,93, 6DD 
3856 DATA 93,57, 76,C8, 96, AB, 93,93,56,57,FF,D5, BA, 29,83,5AE 
3469 DATA 83,93, 76,FC, 12, AC, B4, 89,98, 78,50, 76, FC, 12, AC,5EE 
3878 DATA 0C,98, CC, 98,64, CC, 8C, D5, 93,43, E8,C8, AC, 84, CB, 79F 
3984 DATA D9,93,83,56, 76,FF,86, 83,03, 78,B4, A9, EA, CB,CB, GEC 
3498 DATA 58,49, 93,93, 76, FC, 12, AC, B4, 90,98, 78,50, 76,FC, 631 
3198 DATA 12, AC, 4C,75,FF,FF,FF, BA, 4C, D5,93, 52, 76, 0C, 96, 734 
3118 DATA 29,93,FC,FC, 76,93,97,8C, 1C,FC, 57,80, 4C, AC, 7C,4BF 
3128 DATA 83,83, 76,FC, 12, AC, B4, 00,98, 78,5C, 76, FC, 12, AC, 5EE 
3138 DATA 1C,75,93,93, 03, 12,6C,5D,43, A4, 0C, 24, 5D, AE, 24, 37B 
3149 DATA 6C,58,56, FC, FC, 83, 3C, FB, AB, 93,03, 93, 8C, 8C, 78,625 
3158 DATA 3C, CC, BC, CC, D, 76,FC, 14, AC, Ba, 69,88, 78,50, 76, 768 
3168 DATA FC, 12, AC, DD, 75,83,93,83, 12, EE, 5, 83, B4, BO, 38, 609 





3178 DATA 4B,57, 39,38, 78,FE,FC, FC, 93, 6C,8C, AB, 93,83, 83,61F 
3188 DATA 64,6C,CC,CC,98, CC, 60,90, 76, FC, 14, AC, B4, 69,09, 7BA 
3198 DATA 78,50, 76,FC, 12,F8,98,F5, 93, 93,93, 52,64, 5D, 83, 5FC 
3288 DATA F5, 78,F5, 49,83, FA, 79,FA,FE, FC, FC, 49,80, CC, AB, BC 
3218 DATA 93,93, 03, BA, BA, 76,38, 64, BA, 29,56, 76,FC, 13, AC, 591 
3228 DATA B4,99,09, 78,5C,76,FC, 12,F8,F8,F5,03,93,93,52,644 
3239 DATA F6,5D,03,F8,F9,FE,03,93,57,F0,F8,AB,FC,FC, FC, ABA 
3248 DATA CC,CC, AB, 43,83, 93, FD, 76, F9, 84, 79,B4,03, 03, 76,653 
3258 DATA FC, 13, AC, B4,89,98,78,5C,76,FC,13,FF,FF, 76,83, 73F 
3269 DATA 84,FF,FF,03,57,FF,AB,93,93,57,FF,FF,AB,56,FC, 85E 
3279 DATA FC,FD,FF,FE, 76,FC, 04, 76,FF,05, AB, 93, 93,56, 76, 863 
3289 DATA FC, 12, AC, B4,49,99,78,5C,76,FC, 14, A9,93,93,FC, 673 
3298 DATA FC, FC, A9,93,93,FC, 76,93,98, 76,FC, 94,93, 93,56,5F6 
3399 DATA FC, FC, FC, 76,83,88, 76, FC, 12, AC, B4, 89,99, 78,5, 72D 
3318 DATA 76,FC, 14,49,93,93,FC,FC,FC, A9,93, 83, FC, 93,03, 6DA 
3328 DATA 93,56,A9,83,83,93,56,FC,FC, FC, 93,93,56, FC, FC, 6A9 
3338 DATA FC, 76,93,98, 76, FC, 12, AC, B4, 98,98, 78,5C, 76,FC,GA7 
3348 DATA 14,A9,93,93,FC,FC,FC, 9,93, 83, FC, 93,03,93,FC, 667 
3358 DATA FC,93,93,93,56,FC,FC,FC,93,83,56,FC,FC, FC, 76,815 
3368 DATA 93,97,56,76,FC, 12, AC, B4, 99,09, 78,5C, 76, FC, 14,59E 
3378 DATA 49,93, 93, FC, FC, FC, A9,83,93,FC,93,93,56,FC,FC, 7A2 
3389 DATA A9,93,93,56,FC,FC,FC,93,83,56,FC, FC, FC, A9, 76, 868 
3399 DATA 93,96, 76,FC, 13, AC, B4, 98,90, 78,50, 76,FC, 15,83, 54C 
3499 DATA 93,76,FC,84,93,03,FC, A9,93,56,FC, FC, A9, 93,93, 624 
3419 DATA 56,FC, FC, FC, A9,93,56, 76,FC, 94, 76,93,85,56, 76, 78C 
3428 DATA FC, 13,AC,B4,99,89,78,5C, 76, FC, 4A, AC, B4, 99,98, 65F 
3438 DATA 78,50, 76,FC, 4A, AC, B4,98,98, 78,50, 76,FC, 4A, AC, 72C 
3449 DATA B4,09,98,78,5C,76,FC, 4A, AC, B4,98, 69, 78,5C, 76,5FE 
3459 DATA FC, 4A, AC, B4, 99,98, 78,50, 76,FC, 4A, AC, B4, 89,89, 696 
3469 DATA 78,5C,76,FC, 4A, AC, B4,99,99,78,5C, 76,FC, 4A, AC, 72C 
3478 DATA B4,99, 99, 78,50, 76,FC, 4A, AC, Bâ, 98,09, 76,5, 76,5EE 
3489 DATA FC, 4A, AC, B4,89,99,78,5C, 76, FC, 4A, AC, B4, 00,09, 696 


S.SH 34 
+ TUX 44 








3498 DATA 78,50, 76, FC, 4, AC, B4, 08,08, 78,76,4C,4C,B4, 99, 5EA 
3594 DATA 09, 78,76, CC, 4C, 84,99, 09, 78,76, F8, 4C,B4, 90,98, 598 
3518 DATA 76,30, 4E, 76,98, A1,C3, 1C,88,C3,4F, 89, C3, 3E, 89,689 
3524 DATA C3, 40,89, 49, DD, 21, C7, 81, DD, 7E, 99, 76,98, 64, 32, SAG 
3538 DATA 0C,89,C9,FE, 93, DB, 7, C8, 11,FF,FF,FE, 92, 29, 04, 7DE 
3549 DATA DD,56,91,DD,5E, 99, DD, 23, DD, 23, DD, 46,91, DD, 4E, 6BE 
3554 DATA 49, CD, AD, 89,C3, 3E, 68, 21, 33,82, 11,29, 82,81, 99,517 
3568 DATA 9, ED, B9, 21, 29, 82,C3,E3, BC, 21, 29, 82, CD, E6, BC, 886 
3578 DATA 0E,3F,3E, 97,C3,43,85,DD,E5,FD,E5,E5,D5,F5,C5,935 
3589 DATA FD, 21,26, 82, DD, 21,C7,81, FD, 7E,99,B7,C4, 3F,82, 7C3 
3599 DATA FD, 7E, 81, DD, 21,D7,81,B7,C4, 3F,82,DD, 21,E7,81,874 
3699 DATA FD, 76,02, 87, C4,3F, 82, FD, 7E, 09, FD, 86,91, FD, B6, 89B 
3619 DATA 92,CC, 4F, 89, 3A, 3E, 82, 3D, 28, 96,CD, 68, 83, 34, 30, 529 
3628 DATA 82, 32,3E,82,C1,F1,D1,E1,FD,E1,DD,E1, C9, 21,41, 99F 
3638 DATA 81,05,D5, 11,C7,81,91, 19,98, 3E,91,E5, C5, ED, B4, 798 
3648 DATA C1,E1,32,D2,81,E5,C5, 11,D7,81, ED, BG, C1, E1,3C, 9B5 
3658 DATA 32,E2,81,11,E7,81,ED, BP, 3C, 32, F2,81,3E, 1, 32, 6FD 
3668 DATA 3E, 82, FD, 21,26, 82, FD, 77,99, FD, 77,01, FD, 77,02, GES 
3679 DATA D1,C1, 2, 2,82, DD, 21, C7,81, DD, 73,49, DD, 72, 84, 756 
3689 DATA D5,C5, CD, 22, 81,C1,D1,C5,D5, DD, 21, D7, 81, 2, 22, 8D8 
3698 DATA 82, DD, 73,49, DD, 72, 6A, CD, 22,81,D1,C1,DD,21,E7,81B 
3708 DATA 81, 2A, 24, 82, DD, 73,89, DD, 72, 8A, 78,81, 28, 14,C5,62D 
3718 DATA 7E,CB, 7F,28,05,CD,51,81,18, F6, 7E, 23,87,29,FB, 715 
3728 DATA C1,9B,18,E8,DD, 75,87, DD, 74,08, C9, 09, 09,91,98,548 
3738 DATA 91,03,01,76,08,95,01,01,08,00,E6, 87, 3D, 29, 8D, 109 
3749 DATA 7E,23,CB,5F,3E, 89, 28,81, 3C, DD, 77,92, C9, 30, 28, EA 
3758 DATA 12,23, 7E, DD, 77,98,DD, 77,6E, 23,7E, DD, 77,81,DD,63C 
3769 DATA 77,8F,23, C9, 3D, 2,87, 23, 7E, 23,DD, 77, 9D, C9, 30, 581 
3778 DATA 28,92, 23, C9, 3D, 28, 17, 23,78, E6,8F, 3C, DD, 77,83, 4AB 
3784 DATA 7E,CB,3F,CB,3F, CB, 3F, CB, 3F, 3, DD, 77,04, 23, C9, 726 
3798 DATA 3D, 29,06, 7E, 6, 3F,CB, 9F,CB, 9F,CB, 9F, DD, 77,05,685 
3898 DATA 23,C9,3D, 23, C8, 7E,23,E5,DD,E5, DD, 46,88, E6,F, 777 
3818 DATA 4F, CD, 2A,65,DD,E1,Et, C9, 76,68, 84,81, 76, 00,0F,639 
3828 DATA 82, 76,88,0F,03, 76,00,05,96,06, 76,09,0A, 19,09, 1AE 
383 DATA 82, 76, 90,09, 28, 0,04, 76,08,0E, 22, 88,8, 89,E5,413 
3849 DATA 8B, 76,08, 12,81,5C, 69,49, 09,96,08, 22, 1E, 82,DD, 415 
3858 DATA 7E, 8C, 3D, 28, 84, DD, 77,80, C9, DD, 7E, AD, DD, 77, 0C, 5E4 
3868 DATA DD, 7E,86, 30, 28, 94, DD, 77,46, C9, DD, 66,98, DD, 6E, 683 
3878 DATA 97, 7E, 87, 28, 28, 23,D0,56,6E,D0,5E,9F, DD, 72, 89,581 
3888 DATA DD, 73,81,D0, 46, A, DD, 4E, 89, 8, DD, 71,99, DD, 79,661 
3898 DATA 84, 78,81,28, 84, 7E,87,28,06,DD, 46,88, C3, 33,85,563 
3998 DATA FE, 88, 38,86, CD,51,81,7E, 18,F6, 11, 89, 82, 7E, E6, 797 
3948 DATA 9F,83,5F, 34,41, 14, 1A,DD, 77,06, 7E, CB, EF, 28, 1D, 4A7 
3929 DATA 23,DD, 75,87, DD, 74,88, DD, 46,98, C3, 9D,85, 03,84, 55F 
3938 DATA 99,96,4C,18,91,91,03, 94,09, 89,12, 24,81, 01, 23, A9 

3949 DATA CB, 77,28, 17, 7E,E5, DD, ES, DD, 46,08, DD, 4E, 93, CB, 7CD 
3958 DATA 77,28,93,DD,4E, 94, CD, DB, 84,DD,E1,E1, 7E, 23, DD, BiA 
3968 DATA 75,97, DD, 74,88, E6,3F, CB, 3F, CB, 3F, CB, 3F, CB, 3F, 722 
3979 DATA 28,47, 7E,E6,0F,4F,DD,66, 48, DD,6E, 81, 78, B7,C4, 6B6 
3988 DATA 35,83, DD, 7E, 82,DD,E5, CD, 58, 84, DD, Et, DD, 7E,45, 89E 
3994 DATA 83,47, 44, DD, ES, CD, 27,84, DD, Et, DD, 46, 8B, C3, 1E, 81B 
4998 DATA 85,81,02,84,08, 19,29, 49,91,02,94,08, 19, 28,81, 144 
4818 DATA 92,94,E5, 11,25,83,79,83,38,81, 14,5F, 78, 21,FF, 4DC 
4828 DATA 69,FE,03, 28,05, 25, 30, 2,81, 20, 14, 4,67, (A, EE, 48 
4938 DATA FF, DD, 46,08, 84, DD, 77,68, LA, A5,6F, LA, EE, FF, DD, B9C 
4848 DATA A6,81,B5, DD, 77,81,E1,C9,FD, 21, 10, 82, E, 38, FD, 78B 
4858 DATA 77,46,DD, 21,F7,81,CD, A1,83, DD, 21,83, 82, CD, A1, 7CF 
4869 DATA 83, DD, 21,4F,82, CD, 1,83, FD, 4E, 88, 3E, 97, C3, 43,699 
4878 DATA 85, 7E, EG, 89, 28,95, 7E, 23,6, 7F,C9, 11,89, 99,5E,5D4 
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4988 DATA B7,ED,52,18,F2,DD,66, 96, DD, 6E, 95, CD, 8E, 83, 4F, 7C6 
4998 DATA DD, 74,96, DD, 75,95, FD, 7,98, 28,88, DD, AE, 89, FD,6E4 
4199 DATA 77,98,3E,96,CD, 43,65, DD,6E, 83, DD, 66,94, CD, 8E, 649 
4118 DATA 63,DD, 75,93, DD, 74,84,E6,8F,26,89,6F,E5,D1, DD, 74A 
4129 DATA 7E,8B,B7,28,94, 19, 3D, 18,FA,CB,3C, CB, 1D, CB, 3C, 5CA 
4138 DATA CB, 1D, CB, 3C, CB, 1D, CB, 3C, CB, D, 4D, DD, 7E, 81, CD, 73C 
4149 DATA 43,85,DD,66,98, DD, 6E, 97, CD, 8E, 83, DD, 74,98, DD, 779 
4158 DATA 75,97,11,99,98,5F,21,19,99,87,ED,52,DD,5E, 89, 457 
4169 DATA DD, 56, 9A,B7, 19, 4D, DD, 7E,42,F5,CD, 43,85, F1, 3C, 76E 
4178 DATA 4C,C3, 43,85, 21,48,84,79,CB,27,85,38,81,24,6F,57ÿ 
4189 DATA 78,3C,5E, 23,56,EB, 3D,C8,CB, 3C, CB, 1D, 18, F8,EE, 768 
4199 DATA DE, 18,0E, 4D, 9D, 8E, C, DA, 8B, 2F,0B,6F, DA, F7, 09, 3ED 
4299 DATA 68,99,E1,98,61,98,E9, 97, DD, 21, iB, 82,22, 1B, 82, 58D 
4219 DATA 21,B9,84,B7,29,93,21, AB, 84, 1E,09,79,FE, 97, 38,553 
4229 DATA 96,B7,DE,97,1C,18,F6,F5,85, 39,81, 24,6F,56, 78, 5DB 
4238 DATA B7,29,3E,21,B7,84,F1,85,39,91,24,6F, 7E, DD, AG, GAC 
4249 DATA 81, 28,86, DD, A6, 99, 29, 9A, 14,7A,FE, 9C,D8, 1C, DE, 546 
4258 DATA 9C,57,C9,CD,95,84,15,7A,FE, 9C,D8,C6,8C, 1D,57,6C9 
4269 DATA C9,94,95,97,09,9B,0C, DE, 19,11,13,15,17,91,92, 164 
4278 DATA 94,98, 19,29, 48,F1, 78, 3D, 28,D1,3D, 28, D8, 18, CD, 53D 
4289 DATA 19,95,29,FC,C9,21,F7,81,95,11,9C, 99,C4,C8,84,5CE 
4298 DATA E5,DD,E1,C9,CD,CD,84,21,61,85,11,86,899,41,95,6EE 
4399 DATA C4,C8,84,DD, 23, DD, 23, DD, 23, DD, ES, D1,91, 96,98, 7AA 
4318 DATA ED,B9,C9,DD, 75,93, DD, 74,84, 19,DD, 75,85, DD, 74, 7D1 
4329 DATA 96, 19,DD, 75,47, DD, 74,48,C9,CD, CD, 84, 11,92, 98, 5CB 
4338 DATA 21,18,85, 18,E8, 88,91,88,61,6F,91,E5, CD, CD, 84, 64B 
4349 DATA Ei,DD, 75,99, DD, 74,9A,C9,C5,CD, CD, 84,C1, DD, 71,952 
4358 DATA 8B,C9,C5,CD, 9D, 85, C1, 48,96, 98,21, 25, 82, 99, 8E, 516 
4369 DATA 99,77,09,96,F4, ED, 79, 96,F6, ED, 78,F6,C8, ED, 79,91D 
4378 DATA EG, 3F, ED, 79,96,F4, ED, 49,96,F6,4F,F6, 89, ED, 79, 8E2 
4388 DATA ED, 49,C9,C1,85,C3,85,C5,85,C7,85,C9,85,CB,85,9C1 
4308 DATA D4,85,D6,85, D8,85, #8, 86, 16, 86,22, 86, 24, 86, 3B, 6C8 
4496 DATA 86, 3D,86,3F,66, 72,86, 74,86, 7D, 86,94,86, 96,86, 739 
4419 DATA 9F, 66, B2, 86, C6, 86, C8, 86, CE, 86,D9, 86, D2, 86, 95, BFD 
4428 DATA 87,97,87,09,87,9F,87,11,87,13,87, 39,87, 3B,87, 4EF 
4438 DATA 3D,87, 79,67, 78,87, A1,87,B8,87,BF,87,D6,87,E5, BA 
444ÿ DATA 87,E7,87,E9,87,FE,87,98,88,6F,91,88,91,8F,91,713 
4458 DATA 6F,91,89,91,98,91,99,6F,8E, 8D,8E, 8F, 98, 6F, 91,621 
4469 DATA 89,91,6F,99,6F,BF,6F,6E,6F,6F,68F,99,99, 8F,6F, 7C6 
4479 DATA 6E,8E, 6F,99,98,908, 8F,8E,8E, 8E,6F, 99,91, 99, 8F, 863 
4489 DATA BE, 8D,8E, 8F,99,92,99,6F, 8E, 8C, 8E, 97, 76,8F,94, 731 
4499 DATA 8E, 8E, 8D, 8D, 8C, 8C, 8B, 8A, 89, 88,87, 86, 85, 64, 83, B9D 
4599 DATA 82,81,81,85,67,89,8B, 8D,6F,91,93,95,97,99,91, 72A 
4518 DATA 8F,91,76,6F,94,8E, 8E, 8D, 8D, 8C, 8C, 8B, 84, 89, 88, 79D 
4528 DATA 87,86,85,84,63,82,81,88,91,89,91,6F,91, 76,8F,633 
4538 DATA 97,6E, BE, BE, 8D, 8D, 8D, 8C, 8C, 8C, 8B, 8B, 8B, BA, 84, 7B1 
4549 DATA 8A, 89,89, 89, 88, 88,88, 87,67, 87,86, 86,66, 85,85, 7EE 
4559 DATA 85,64, 84, 84,63, 83,63, 82,82, 82,81,81,81,89,91, 724 
4569 DATA 89,91,99,91,99,8F, GE, BD, 8E, 6F, 98, 76, 6F, 4,6E, 608 
4578 DATA 8E, 80, 8D,8C, 6C, 8B, BA, 89, 88, 87,86, 85, 84, 83, 82, 891 
4588 DATA 81,88,01,89,91,99,91,99,6F,8E, 8D, 8E,97, 76,8F,678 
4598 DATA 84,6E, 6D, 6€, 8B, 8A, 89, 88,87, 86,65, 84,83, 82,81, 76D 
4699 DATA 89,81,76,9F,96,9E,9C, 94,98, 96,94, 92,98, 8E, 8C, 76E 
4619 DATA 84,88, 88,891,6F, 91,686, 8A, 8C, BE, 6F, 81,89, 91,8F,5ED 
4629 DATA 91,8F,8F, 69,89, 6F,6F, BF, GE, BE, 8E, 8D, 8D, 8D,8C, 7A9 
4639 DATA 6C, 8C, BB, 6B, BB, BA, 8A, BA, 89, 89,89, 88, 88,88, 87,811 
4649 DATA 87,87,86,86,86,85,85, 85,84, 84,84, 83,83, 83,82, 7C6 
4658 DATA 82,82,81,81,61,88,91,9F,91,68F,91,8F, 8C, 88, 64,65F 
4669 DATA 89,91,99,91,6F,91,8F,6F, 69, 89, 76,8F,94,6E,8E,5ES 





4678 DATA 6D, 8D, 6C, 6C, 8B, 8B, BA, 8A, 89, 89, 88, 88, 87, 87, 86,812 
4689 DATA 86,85,85, 84,64, 63,83, 62,82, 81,81, 69,91, 8D,91,6B3 
4698 DATA 6F,91, 76,6F,97,8E,8E, 8E, 6D, 8D, 8D, 8C, 8C, 8C, 8B, 71C 
4798 DATA 8B, 8B,6A, 8A, 84, 89, 89, 89, 88, 88,88, 87,87, 87,86, 882 
4719 DATA 86,66, 65,65, 65,84, 84, 84,83, 83,83, 82, 82, 82,81, 7B7 
4729 DATA 81,81,89,91,9F,9F,9F,9A,93, 6C, 86, 91, 76, 8F, 19,6BE 
4739 DATA BE, BD, 6C, 8B, 8A, 89, 88, 87, 86, 85,84, 83, 82, 81,89, 7E9 
4749 DATA 91, 76,6F, 94, 8E, BE, BD, 8D, BC, 8C, 8B, BA, 89, 88,87, 785 
4758 DATA 66,65, 84,83, 82,81, 88,91, 66,91 ,9F, 89, 89,89, 91,6CD 
4768 DATA 9E,9C,9B,99,98,96,95, 93,92, 99, 8F, 8D, 8C, 8A, 89, 8A1 
4778 DATA 87,86, 84,83, 81,88,6F,91,6F,8E,8C, BA, 88, 86, 85, 76B 
4789 DATA 84,83,82,81,81,69,89,91,99,61,6F,91,76,6F,04,5B6 
4798 DATA 6E, 8D, BC, 8B, 8A, 89, 88, 87,66, 85,84, 83, 82, 81,89, 7E9 
4890 DATA 89,81,87,91,6F, 91,62, 99,82, 83, 95,85,51,86,87,5A1 
4819 DATA 14,89, 84,35,98,55,67,98,15,687,08,55,B7,89,15,3F5 
4829 DATA B7,98,55,86, 09, 15,66, 99,55,85,99,54,83,54, 82, 4B4 
4839 DATA 99,55, 87,09, 15,87,08,83,06,55,B7, 89, 83,87, 15, 3AC 
4849 DATA B7,99,83,98,55,86,99, 63,99, 15, 86, 69,83, 9A,55, 426 
4859 DATA 65,99, 683,9B,54,83,54,62,09,55,83,09,55,C3, 99, 4B9 
4869 DATA 83,97,75,99,75,89,75,00, 75,00, 75, 09,82, 89,81,456 
4679 DATA 87,1F,9E, 85, B4,58,82,58,84,5C,87,98, 75,09, 8E, 699 
4889 DATA 87,1C,74,54,C4,99,15,C4,80,75,08,87,17,8E,85,52E 
4899 DATA 11,83, 98, 75,98, 75,98, 75,90,55,86,89,55,66, 98, 3B1 
4999 DATA 55,86,09,55,66, 99,55, 86, 09,55, 86, 00,55, 88,08, 449 
4919 DATA 55,86, 98,55, 89,99,55,89,98,55,66, 98,55, 86,09, 44F 
4929 DATA 55,86,99,55,86,99,96,85,FE, 87, 1C,53,82,53,82,61C 
4939 DATA 53,C2,53,82, 99,53, 82,53,82,53,C2,53,82, 99,53, 5D1 
4949 DATA 82,53,82,53,C2,53, 82, 99,53, 82,53, 82,53,C2,53,653 
4959 DATA 82,49,53,82,53,82,53,C2,53,82,98,53, 82,53, 82,5C8 
4969 DATA 53,C2,53, 82,96, 53,82,53,82,53,C2,53,82, 09,53, 5D1 
4979 DATA 82,53, 82,53,C2,53,82,98,53, 82,53, 82,53, C2,53,653 
4988 DATA 82,99,53,82,53,82,53,C2,53, 82,98, 53,82,53,82,5C8 
4999 DATA 53,C2,53,82, 98,53, 82,53,82,53,C2,53, 82, 99,53, 5D1 
5999 DATA 82,53,82,53,C2,53, 82, 99,53, 82,53, 82,53,C2,53,653 
5818 DATA 82,99, 53,82,53,82,53,C2,53,82,98,53,82,53,82,5C8 
5928 DATA 53,C2,53,82,98,53,84,53,84,53,C4,53,84, 09,53, 5D9 
5439 DATA 84,53,64,53,C4,53,84,98,53,84,53,84,53,C4,53,661 
5949 DATA 84,09,53,684,53,84,53,C4,53, 84,99, 53,85,53,85, 5D9 
5458 DATA 53,05,53,85, 99,53,65,53,85,53,C5,53,85, 89,53,5E3 
5969 DATA 85,53,85,53,C5,53,85,99,53,85,53,85,53,C5,53, 668 
5979 DATA 85,99,53,82,53,82,53,C2,53,82,98,53, 82,53, 82, 5C3 
5989 DATA 53,02,53,82,99,53,82,53,82,53,C2, 53,82, 9,53, 5D1 
5899 DATA 82,53, 82,53, C2,53, 82, 98,53, 82,53, 82,53, C2,53,653 
5198 DATA 82,89,53,82,53,82,53,C2,53,82,99,53,82,53,82,5C8 
5118 DATA 53,02,53,82,98,53,C2,53,C2,53,C2,53,C2, 88,55,693 
5129 DATA C2,88,75,08,55,C2,89,55,C2,99,09,53,82,99,82,555 
5138 DATA 83,95,65,52, 8E, 87, 1F,89,84,75,48,54,87,54,8A,5CE 
5149 DATA 89,54,8C,54,8A,08,54,B7,54,8A,09,54,8C, 54,8A,565 
5158 DATA 99,54,66,54,8A,98,54,8C,54,8A,98,54,85,54, 8A,52D 
5169 DATA 99,54,683,54,82,96,54,87,54,BA,08,54,8C,54,8A,524 
5178 DATA 99,63,06,54,B7,54,68A,98,83,97,54,8C,54, 8A, 89, 4BA 
5189 DATA 63,98,54,86,54, 84,99, 83,99,54,6C, 54,8, 09,83,518 
519$ DATA 9A,54,65,54, 8A, 95,83, 8B,54,83,54,82, 8, 87, 1C, 49F 
5289 DATA 53,C3,53,07,53,CB,53,CC,88,55,CA, 98,87, 1F,83,6B5 
5219 DATA 97,85,3D,9E,55,89,98,96,55,C7,98,85,87,86,55,69E 
5228 DATA 87,88,55,C7,89, 82, 89,81,96,85, 4A,59,87,59,87,639 
5238 DATA 56,87,58,87,58,87,58,87,58,87,58,87,80,9E, 50,5F8 
5249 DATA C7,58,C9,5C,CB, 69, 8E, 85,B9,55,84, 99,87, 1F,55,6A7 
5259 DATA C4,98,15,C4,98,85,1E,8E,55, 84,98, 87, 1C,9E, 85, 56D 


5268 DATA 25,83,88, 75,80, 75,89, 75,89, 75,90, 74,33, 53,82, 499 
5278 DATA 99,53,84,54,85,53, 64,08, 13, 84,50, 82,09, 15, 82, 493 
5288 DATA 08, 14,82,53,81,53,82,08,55,84, 90, 15,84, 00,50, 49D 
5298 DATA 85,53, 84,99, 13,84,5C,85,98,53,85,53, 84,54, 82, 559 
5369 DATA 89,15,82,89,54,82,54, 82,90,54, 82, 54,82, 00, 75, 464 
5318 DATA 99, 75,09, 75,00, 75,08, 75,80, 75,60, 75,80, 75,00,333 
5329 DATA 54,82,53,82,53,681, 99,53, 82,53, 82, 53,81, 53,82, 502 
5338 DATA 89,13,82,53,82,53,82,53,81,09,53,82,53, 82, 53,518 
5348 DATA 81,53,82,99,54, 82,53, 82,53,81,99,53,82, 53, 82,57F 
5358 DATA 53,81,53, 82,99, 13,82,53,82,53,82, 53,81, 69,53, 58F 
5368 DATA 82,53,82,53,81,53, 82,99, 5C, 84,53, 82,99, 53,84, 58C 
5378 DATA 54,85,53,66, 98, 1C,86,53,86,09,54,85,58, 84,59, 535 
5388 DATA 94,49,54,85,53, 84,53, 82, 09, 15,82, 09, 13, 82,53, 498 
5399 DATA 81,53,82,53, 84,96, 13,84,53,84,53, 82,53, 81,09, 544 
5496 DATA 54, 82,53, 82,53,81,09,53, 82,53, 82, 53,81,53,82, 5D2 
5418 DATA 09,13,82,53,82,53,82,53,81,09,53,82,53,82,53,518 
5428 DATA 81,53,82,99,54,82,53, 82, 53,81,09,53,82,53,82,57F 
5438 DATA 53,81,53, 82,98, 13, 82,53, 82,53, 82,53, A9, 99,53, 52E 
5448 DATA 81,53,81,53,81,53,81,99,55, 82, 09, 75,09,51,89, 523 
5458 DATA 51,88,51,86,51,88,51,86,51,85,80,51,86,51,85,5E3 
5468 DATA 51,84,51,85,51,84,51, 82,09, 99,53, 83,95, 85,59, 593 
5478 DATA 96,87, 1F,89, 84, 35,98, 75,08, 75,08, 75,80, 75,08, 452 
5488 DATA 75,89,75,99, 75,00, 75,08, 75,08, 75, 80,83, 06, 75, 3BC 
5498 DATA 99,83,07,75,08,83, 08, 75,88,83,89, 75,80, 83, PA, 38D 
5598 DATA 75,09,83,88, 75,99, 75,08, 75,00,83, 97, 75,08, 75, 36 
5518 DATA 08,75,09, 75,08, 75,00, 75,08, 75,08, 8€, 75, 80,87, 303 
5528 DATA 1A,85,18,55,84,96, 75,9, 67, 1A,6E, 65,11, 83,98, 458 
5538 DATA 75,09,55,62, 98,55, 82, 08,55, 82,99,55, 82, 89,55, 426 
5548 DATA 82,80,55,82,09,55,82,09,55,62,96,55,84, 00,55, 435 
5554 DATA 84,09,55,85,08,55,85, 68,55, 82, 08,55, 82, 00,55, 438 
5568 DATA 82,80,55,82, 49,85, 16,87, 1C,53,82,53,82,53,82,516 
5578 DATA 53,82,08,53, 82,53, 82,53, 82,53,82, 49,53, 82,53,551 
5588 DATA 82,53,82, 53,82, 99,53, 82,53, 82,53, 82,53, 82,68, 589 
5598 DATA 53,82,53, 82,53, 82,53, 82, 68,53,82,53, 82, 53, 82, 5D3 
5698 DATA 53,82,8,53, 82,53, 82,53, 82,53, 82, 09,53, 82,53,551 
5618 DATA 82,53, 82,53, 82, 98,53,82,53, 82,53, 82,53, 82, 09,589 
5628 DATA 53,82,53,82,53, 82,53, 82, 49,53, 82, 53,82, 53,82, 5D3 
5638 DATA 53,82, 09,53, 82,53, 82,53, 82, 53,82, 89,53, 82,53,551 
5648 DATA 82,53,82,53, 82, 96,53, 82,53, 82,53, 82,53, 82,08, 588 
5658 DATA 53,82,53, 82,53, 82,53, 82,08, 53,82,53, 82, 53, 82, 5D3 
5668 DATA 53,82,49,53,84,53,84,53,64,53,84, 99,53, 84,53, 55B 
5678 DATA 84,53,84,53,64,08,53,84,53,84,53, 84,53, 84,09,56E 
5684 DATA 53,84,53,84,53, 84,53, 84,49,53,85,53,85, 53,85, 5E4 
5698 DATA 53,85,09,53,85,53,85,53,85, 53,85, 60,53, 85,53, 563 
5709 DATA 85,53,85,53,85,08,53,85,53,85,53,85,53, 85,08, 595 
571 DATA 53,82,53,82,53, 82,53, 82,08, 53,82, 53, 82,53, 82, 5D3 
5726 DATA 53,82,09,53, 82,53, 82, 53,82, 53,82, 60,53, 82,53,551 
5739 DATA 82,53, 82,53, 82,00,53,82,53, 82,53, 82,53, 82, 80,588 
5748 DATA 53,82,53, 82,53, 82,53, 82,98, 53,82, 53,82, 53, 82, 5D3 
575 DATA 53,82, 09,53, 82,53,82,53,82, 53,82, 99,55, 82, 80,598 
5768 DATA 75,89,55,82,80,55,82, 99,98, C7,53, 87,53, 87,53, 4F1 
5778 DATA 86,98,53,C7,53,87,53,87,53,86,98,53,C8,53, 88,623 
5788 DATA 53,88,53,87,80,53,C8, 53,86, 53,88, 53,87, 90,53, 5B3 
5798 DATA C9,53,89,53,89,53,86,48,53,C9,53,89,53, 89, 53,681 
5898 DATA 86,89,53,C9,53, 89,53, 89,53, 86,04, 53,C9,53,86,628 
5818 DATA 53,09,53,86,98,53,C7,53,87,53,87,53, 86,9, 53,5EF 
5829 DATA C7,53,87,53,87,53,86,90,53,C8,53,88,53, 88, 44, 669 
5838 DATA 49,53,09,08,9A,6F, 41, 46,5F, 42,4F,55,43, 99, AB, 47C 
5849 DATA 8F,4E,5F,41,46,5F, C, 49,47,58,99, 44,5F, 43, 4E,51A 





5858 DATA 54,94,00,98,5E, 98, 4C, 49,47,5F,53,55,50, 89,65, 3DA 
5868 DATA 98,43, 4E,54, 76,99,85, 73,98, 4F,55,54, 76, 90,5, 466 
5874 DATA 74,98, 4D,55,53, 31, 76,88,84,81,98, 4D,55,53, 32, 4DC 
5888 DATA 76,88,84,85,99,58, 41, 4C, 31, 76,89, 04,89, 98,58, 488 
5808 DATA 41,4, 32, 76,98, 84,99, 98, 45, 4E, 44,5F, 59, 89,89, 3F1 
5998 DATA 68, 9,99, 76,89,87,AF, CD, BE, BC, 21, 89,98, CD,53, 6D6 
591# DATA 8F,CD, 19, BD, 21, 74,98, CD, 6E, 8F,21, 89,98, CD, 53, 77B 
5928 DATA 6F,DD, 21,81,99,CD,69,8F, CD, 19, BD, CD, 49, 88,34, 796 
5938 DATA 4C,86,B7,28,87,DD, 21,85,98, CD, 69, 8F, CD, 7E,8F, 71C 
5948 DATA CD, 1B,BB, 38,E8, CD, 83, 89, 21, 28, 29, CD, 53, 8F, CD, 6EB 
5958 DATA 19,BD, 21,29,56,11,08,C8,91,88,16,ED, BG, C9, AF,5EA 
5968 DATA 46,48,F5,E5, CD, 32, BC, E1,F1,23,3C,FE, 19, 29,F1, 873 
5978 DATA 81,69, 89,C3, 38, BC, 3E, #2, C3, 68,88, 96, RC, 7E, B7, 532 
5984 DATA F8, ED, 79, 23,84, 7E, ED, 79, 23,05, 18, F2,3E, 69, 11, 5EA 
5998 DATA 89,C2,F5,CD,9A,6F,F1,F5, 2F,D6,C1, CD, 94, 8F,F1, ACE 
6868 DATA 3C,FE, 9F,29,81,AF, 32, 7F,6F, C9, 4F, 96, 3E, 21, AB, 5A6 
6919 DATA 6C, 78, DD, 21, 73,98, DD, 77,98, 91,D2,58,98, 89,F5, 7F9 
6828 DATA C5,D5, ED, A, ED, A8, ED, A8, ED, A, ED, AG, ED, AG, ED, BDS 
6838 DATA A6, ED, A8, ED, AP, ED, A, ED, A8, ED, A8, ED, A9, ED, AG, B7B 
6848 DATA ED, A8, ED, A9, ED, A, ED, A9, ED, AS, ED, A9, ED, A8, ED, BCB 
6859 DATA AS,ED, A9, ED, A, ED, A, ED, AB, ED, A9, ED, AG, ED, AG, B7B 
6868 DATA ED, A8, ED, A8, ED, A8, ED, AS, ED, AB, ED, A9, ED, A8, ED, BCB 
6878 DATA AS,ED, A9, ED, AB, ED, A, ED, A9, ED, AG, ED, A, ED, A9, B7B 
6488 DATA ED, A9, ED, A8, ED, A8, ED, A, ED, AB, ED, AG, ED, AB, ED, BCB 
6899 DATA AS,ED, A8, ED, AB, ED, AB, ED, A8, ED, A8, ED, A9, ED, A9, B7B 
6198 DATA ED, AG, ED, AG, ED, A8, ED, A, ED, AB, ED, AG, ED, AB, ED, BCB 
6118 DATA AS, ED, A8, ED, AB, ED, A8, ED, A8, ED, A8, ED, A, ED, A9, B7B 
6128 DATA ED, A8, ED, A8, ED, A8, ED, A8, ED, A8, ED, A9, D1, CD,65,B51 
6138 DATA 99,C1,F1,18,96,C5,81,58,98, 99, C1, DD, 35,88, C2, 614 
6149 DATA A8,8F,C9, 7A,C6, 98, 57, D8, 78, C6, 58, 5F, 7A, CE, CB, 867 
6159 DATA 57,09, 3E, 91, 28,92, 2E, 96, 19,97, LE, 8C, 39, 8D, 99, 244 
6169 DATA 88, 18,89, 1E, 48, 18,49, 36,49,09,01,05,0B, DE, 17,134 
6178 DATA 1A,8A,01,76,08,98,93,06,8F, 19,19, LA, 17,91,85,11B 
6189 DATA SE, 88, 11,94,87,968,90, 99,00, 06,09, 09,09, 8,09, 30 
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19 ? DATAS2A AXYS 

# 

38 MODE 2:AD-4C898:NL-98 
48 FOR A=1 TO 667:B=9:FOR C=1 TO 15:READ A$ 

58 POKE AD, VAL("&"+A$) :B=B+PEEK(AD) :AD=AD+4 

68 NEXT:READ E$:1F VAL("L"4E$)CB THEN 88 

78 NL=NL+19:NEXT: SAVE" INTROA", B, &CHBS, &2719:CLS :END 

88 CLS:PRINT"LIGNENL:;" INCORRECTE" :END 

98 DATA 21,8B,27,11,89,BE, 91,30, 99,5, ED, B9, CO, 21, 48, 584 
188 DATA 27,11,49,09,91,95,68,ED, 43, A3, BE, 81, 19, 7F, F3, 584 
118 DATA ED, 49, 7E, FE, 76, 28, 1A, 12, 13,23, 96, 7F, F6, 48, AG, 68D 
128 DATA ED, 79, 91,99, 98,8B, ED, 43, A3, BE, 78,B1,28,E5,FB, 72C 
139 DATA C3, 49,93, 23, 7E, 23, 4E, 12, 13,90, 28,FB, 18, DD, 83, 52D 
148 DATA 29, 1C, 98, 48, 76,08, 8B, 76, 30,8, 76, 3C,6F, C, 76, 442 
159 DATA 30, 4B, FC, FC, B9, 33, 76, 76,01, FC, 7C, 9, 33, 8F, 33,6FE 
168 DATA FC, BC, 3C, 3, 42, B9, 3C, 83, 42, 76,98, 96, 3C, 98, 83,568 
178 DATA 42,9C, 38,98, 93, 42, 3C, 98,98, 76, 3C, 04,98, 98, 30,581 
188 DATA 76,98, 8, 76,30, 19, BC, 76, 30, AD, 7C, FC, 33,43, 42,54€ 
198 DATA 76, 76,81, BC, FC, 27, 18, 76, 76,81, FC, BC, FC, 27, 3C,6EB 
288 DATA 93,42, 76,4B,88, 3,69, 76,48, 66, LE, 76, 3C, 94, 4B, 39F 
219 DATA 4B, 3C, 3C, 4B, 93, 42, 1E, 76,30, 15, 7C, FC, B9,66, 19, 4E8 
228 DATA 33,03,42,27,6F,1B,8F,0F,1B, 1B, 33,33, 76, 76,81, 278 
239 DATA FC, FC, 76,33, 94, 27, 27,33, 27, 18, 76, 76,81, 89, 33,541 
249 DATA 8F,76, 30, 38, FC, FC, B9, 76, 33,06, 18, 27, 8F,9F, 58,599 
259 DATA F4,C8, 90, 76,0F,96,8F,0F,CF,9F, 1B,9F,4F, LB, 1B,43F 
269 DATA 76,33,84,0F,9F,33,8F,33,8F,4F,CF, 3, 38, 32, 32, 345 
279 DATA 30,32, 3C, 30, 32, 38, 32, 93, 42, 36, 76, 3C, 94, 38, 32, 31D 
289 DATA 83,42, 36,32, 30, 3C, 32,38, 32,03, 42, 36, C, 32, 32, 2DC 
299 DATA 36,76, 3C, 87, FC, B9,66, C4, 9C, 30, 36, 3C, 3C, 78, $C, 5D8 
389 DATA 6C,B9,96, 78,38, BO, CB, QC, E4, 48, CB, C7, 76, CF, 87, 88F 
319 DATA 18,27,CB,C7,CB,CB, C7,CF,9F, 1B, 33, 1B,9F,4F,8F,5E5 
328 DATA CF,DE, 67,CB, 76, 3C,#5, CC, 83, 42, 9C, 6C, QC, 30, 6C, 6F3 
339 DATA QC, 3C, CC, 9C, 3C, 3C, 6C, CC, 3C, 3C, CC, QC, 3C, 3C, 6C, 6B4 
349 DATA CC, 93, 42,9, 76,3, 88,98, 0, 3C, E4, 6C, 8C, 84, 48, 597 
359 DATA 19,8C,C8,8C, C4, 09, CH, B8, 49, 48, 79,38, 80,58, C8, 6B4 
368 DATA 69,08, 49,C1, 76,C3,84,4F,CF,CB, CF,C7, 93,67, C3, 774 
379 DATA 83,42,C7,CF,0F,33,0F, BF, 4F,CB, CB, C3, C3,69, 3C, ECB 
389 DATA 30,69, 3C,3C, 96,69, C3,69, C3, 69, C3, 76, 3C, 98, 7C, 66D 
399 DATA FC,B9, FC, 76, 76,91, FC, BC, B9, 33, 76, 76,81, FC, 34, 85F 
488 DATA 3C, 74,30, 30, 78, 76, 30,05, FD, B8, 9C, 69, 48, CO, 89, 67B 
419 DATA 89,89, 49,86, 29,09, 09,B4,04,48,84,98, 84, 0C, 88, 459 
429 DATA 88,49,89,64,CC, C3,93,42,C7,8F,4F, 76, C3, 87, 6F, GC 
439 DATA 8F,27,4F,CB, C3,C3, 43,93, 76,3, 15, FC, 76, 76,81, 5CC 
449 DATA 30,39, 33,66, 3C,64,5C,3C,FB, 3C, B4, 38, BC, B4, 34, 5D2 
459 DATA 39,2C,B4,98,98,64, 3C, 78,B8,48,4C,C, 48, CB, CB, 638 
469 DATA 49,09, 09,8h, 48,84, D8, 3, 78,38, 4C, A4, 8C, CS, 69,588 
478 DATA 83,42,93,83,43,C3,93,C3, 83, 42, 76, 76,81, 4B,C3, 457 
488 DATA C3,C7,CF,0F, 1B,4F,CB,C3,C3,93, 83, 76, 69,45, C3, 6D$ 
499 DATA 30,96, 76,69, 94, 3C, 3C, 69,96, 96, 3C, 69, C3, 69, 30, 5CF 
589 DATA 69,03, 33, 76, 76,01, 30, B9, 8F, 0F,E4,58, FB, 70, 3C,637 
519 DATA F9,78,F9,64,B4,B#,B4, 3C, F8, B4, 30, 30, 78, F8, BB, 93C 
529 DATA FS,6C,5C, AC, B#,8C, CP, 48,84, C8, 88,09, 89,C9, 6C, 7B8 
539 DATA 76,89,85,49,CC,09,88,93,93, 42,83, C3,C7, 4B,C3, AEA 
549 DATA C7,4F,CF,4F,CB,C7,C3, 03,42, 93, 39, 33, 30, 3C, 39, 5EE 
559 DATA 33,30, 36, 3C, 3C, 76, 39, 96, 3C, 36, 30, 36, 39, 39, FC, 424 








569 DATA 33,93,42,27, 76,0F, 84, 4F,9A, 78,9B, BG, 39, 8C, 8C, 519 
578 DATA 8C,4C,BC, 4C, CC, BC, 4C, 48, C8, 8C, C8, CA, 88,08,93,5E8 
588 DATA C4,C8,39,24,89,08,44,0C,89,89,80,08, 49,00, 80,378 
599 DATA C4,18,69, 76,99, 94,93,93,C3,93, 42,8F,C3,C7,C3, 5Aÿ 
689 DATA C3,07,67,03,C3,83,93,2D, 3C, 93, 42, 2D, 30, 2D, 3C, 57D 
619 DATA 2D,3C,2D, 3C, 76, 2D, 96, 3C, 93,42, FC, FC, B9, 33, 76,556 
629 DATA 9F,04,4F,76,CF,04,8F,2D, DE, 8C, 39, 39, 8C, 4C, 8C,515 
638 DATA C9,C9,8C,48,C8,84,CC, 89,09,88, 76, 99,84, 49,C8,65E 
649 DATA 89,84,98,00,80,C8,84,CC,38,08, 45, 8C, 49, 48, 89, 3AB 
659 DATA 91,93,93, 42, 43,C3,93, 42,C7,8F,4F,CF,C7,C3,93,515 
669 DATA 42,07, 8B, 76,30, 12, 7C,B9, 76,33, 54, 27, 76,0F, 85, 4EB 
679: DATA 4F,76,CF,84,CB,C3,96, 39, 83,96, 6D, 43, C3, C6, 3C, 783 
689 DATA 3C,4C,24,8C, 08, 98,49,68,95,09, 76,C0, 54,84, BC, 38A 
699 DATA C9, 89,89, 49,93,92,76,93,05,47,CB, 83, 76,C3, 84, 4D5 
798 DATA CF,93,42,0F,CB, 76,C3,04,83,83,83, 76, 3C, 19, 7C, 4F2 
719 DATA FC, BC, 3C, AD, 36, 3C, FC, AD, 4F,8F, 76, 76,91, 3C, 2D,679 
729 DATA 8F,CF,CF,CB,CB,36,4B,C3,C7, 1E,6D, C2, 34, 3C, 3C, 7C7 
739 DATA 6C,74,C9,4C,C8,C9,C9, 89,92, 03,02, 68,91, 76,93,555 
749 DATA 95,43,C3,93, 42, 43,83,93, 4B, 43, 76,C3, 84,CF, 83,546 
759 DATA 42,6F,8F,8F,27,33,9F,9F,CB,C3,C3,63,93,93, 76, 487 
768 DATA 3C,0C,37, 76,88,04, A2, 14,33,8F,8F,4F,9E, 6D, 76, 3D8 
779 DATA CF,89,CB,CF,C6, 34, 76,3C, 94, FC, A4, 19,38,84,98, 71E 
789 DATA 9C,C9,49,00,45,93,12,98,81,76,93,07,43,C3, 87,377 
799 DATA 4F,33,CB,76,CF,94,8F,9F,93, 42, 1B, 1B, 76,33,95, 45D 
889 DATA 9F,4F,CF,C3,C3,83,83, 76, 3C, 8A,B9, 89, 15,3F, A2, 5A4 
819 DATA 89,83,42,14,2D,CF,9F,6F,CF,CF,CC,3C,3C,F8,3C,691 
829 DATA 78,3C,4C,3C, 35, 0C,8C,48,C8, 1C, 3C, 2C, BC, CC, E4, 48C 
839 DATA 3C,3C, 79,76,3C, 09,B#, 9C, 38,88,C3,93,42,C7,CF, SAD 
849 DATA CF,6F, 76,0F,84, 1B, 76,33,85,FC,FC, 76,76,41,FC, 691 
859 DATA 83,42,33,33,27,CF,C7,C3,C3, 93, 76,3C, 96, 70, 68,526 
868 DATA F3,F3,15,99,B7,F3,A2,08,93, 42,BE, 33,CF,4F,CF, 76A 
878 DATA 4F,CF,6F,8F, 9D, B9, BE, 76, 3C, 84, 38,9C, 38,8C, 18, 5DD 
889 DATA 78,F9,3C,18,30C,3C,EB,C4,B4, 78,6C, F9, F9, 79, DB, 898 
899 DATA 98,39, 39,B9,F8,39,4C, 64, 1C, ES, 8F,0F,#F, 76,33,58A 
989 DATA 94, 76, 76,91,B9, 76,76,91,FC, FC, B9, FC, 3, 42, 3C,6C5 
919 DATA FC,93,42,33,33,9F,CF,CF,C3,93,83, 76,3C, 98, 76,5C5 
929 DATA 3C, 49, 76,3C,3F, 7C, 76,3C, 4C, 7C, FC, 33, 33, FC, 7C, 5FD 
939 DATA FC,B9,8F,33,FC, BC, BC, 3C, 7C,B9, 76,3, #9, 39, 39, 6F7 
948 DATA 30,38, 76,34,46, 34, 3C, 38, 38, 76, 3C, 84, 30, 39, 3C, 342 
959 DATA 38,39,83, 42, 3C, 3C, 39, 38, 76, 3C, 19, DC, 3C, 7C, FC, 4E4 
969 DATA FC, BC, BC, 76,30,97, 7C,FC,B9, 33,93, 42, FC, FC, 33,891 
979 DATA 8F,76,76,81,FC, BC, FC, 27,3C,93,42,8F,0F, 76,3C,528 
989 DATA 94,9F,9F,3C,9F,93,42, 1E, 2D,9F,83, 42, 76,3C, 84, 297 
999 DATA 8F,8F,76,3C, 94, 76,9F, 08, 76, 3C, 15, 7C, B9, 33, 26, 3B6 
1989 DATA 91,33,93,42,8F,9F, 1B, 76,8F,94, 1B, 1B, 33, 76, 76, 328 
1818 DATA 91,FC,B9, 76,33, 94, 27,33,27,8F, 33, B9, 33, 8F, 76, 497 
1929 DATA 30,2F,7C,FC,FC, 76, 33,96, 8F,33,27,9F, OF, 14,B9, 4D9 
1838 DATA 48,95, 76,9F,95,CF,8F,CF,CF,8F, 1B, 4F,8F,8F,8F,4F9 
1949 DATA 76,33,84,27,9F,1B,1B,27,8F,4F,CF,3C, 3C, 33, 33, 34B 
1858 DATA 30,33, 3C, 3C, 33, 39, 33, 93, 42, 36, 76, 3C, 84, 39, 33, 323 
1969 DATA 93,42,36, 33, 3C, 30, 33, 3C, 33,83, 42, 3C, 3C, 39, 33, 2F1 
1978 DATA 36, 76,3C,97,FC,B9, AC, B4, 3C, 78, 3C, 83, 42, A4, C9, 69D 
1988 DATA #C,58,64,98,78,F8, 29, 1C,24,48,C8,C5, 76,CF,07,641 
1898 DATA 1B,8F,CB,C7,CB,93,42,CF,6F,9F,33,8F,27,4F,8F,599 
1199 DATA 4F,9E,67,CB, 76, 3C, 85,98, 83, 42, 9C, 38,98, 03, 42,564 
1118 DATA 9C,3C,98,9C, 3C, 3C, 38,98, 3C, 3C, 98, 9C, 3C, 3C, 38, 5B$ 
1129 DATA 98,93, 42,9, 76, 3C, 8B,9C, 3C, 3C, 6C, 38, BC, CC, 8C, 54F 
1138 DATA 93,42,48,48,98,98,C8, 48,48, 19,F8, 4C,64,D9,89,51D 
1149 DATA 96,93,42,48,C1,C3,C3,CB,CB,CF,CB,CF,C7,87,67,888 
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1158 DATA C3,93,42,CF,CF,8F,33,0F,4F,CF,CF,C3,83, 42, 60,659 
1168 DATA 69,C3,6D,3C, 2D, 1E, 76,20, 86, 76, 3C, 49, FC, FC, 33, 5AF 
1178 DATA 33,76, 76,91,BC, 33,93, 42,31, 3C,F4, 3C, 83, 42, B4, 4E6 
1189 DATA 78,78,B4,68, DB, 3C, 78, 1C, 69, C8, 93, 42, 09,08, 49,551 
1198 DATA 89,69, 76,98,84,48,84,84,C8,C4, 4B, 80, 49,C9, 84, 5F2 
1289 DATA FB,76,C3,04,8F,0F, 76,C3,86,C7, CF, 6F, 33, 4F, CB, 77C 
1218 DATA C3,C3,83,93,76,3C, 13, BC, 7C, 70,93, FC, 3C, 33, 27, 64A 
1228 DATA 78,78,F4,3C,F0,B4, 78,78, 3, 78, B4, CC, BC, 79, 30, 88B 
1238 DATA D8,B9,F8,9C, 8C, 48,88, 76,C8,94,8C, C9, 84,84, 24, 74A 
1249 DATA 99,64,90, 4C, 79,B9,C8,C9,C9, 99, 03, 42, 09,93, 43,548 
1258 DATA 83,43,C3,93,42,98B,4B,C3,C3,C7,CF,4F,1B, 4F,CB, 754 
1268 DATA C3,83,93,93, 76,3, 17,39, 33, 33, FC, AD, 0F,9F, B9,52B 
1278 DATA 98,9C, 79,38, 78, 78,B4,78,B4,3C, 83,42, 79, B4, 3C, 685 
1288 DATA 3C, 78,24, 4C, 39,E4, DB, 4C,F#,F9,B9, C9, 48,C9,88, 7EC 
1298 DATA 99,98,C6, 48,76,08,84, 49,88, 19, A4,00, 76,03, 84,2F3 
1389 DATA C3,C7,4F,C3,C7,CF,8F,CF,CB,C7,CB,C3, B3,43,3C, 972 
1318 DATA 39,3C, 93, 42,39, 3€, 36, 39, 33, 39, 83, 42, 33, 39, 36, 2F1 
1328 DATA 3C, 36,30, 36, 39, 39, FC, 33, 83, 42, 27, 1B,0F,CF, OF, 3F9 
1338 DATA 4F,CF,CE, 38,64,CC,4C,8C,8C, 84,80, 4C,C9,C8, 84,714 
1348 DATA 48,C8,84,8C,76,C9,84,99, C8, 38,CC, 09,09, 94, 48, 4E2 
1358 DATA 89,C8,98,93,42,48,48,C9,58,8C, 99,93, 42, 89,93, 3F1 
1368 DATA 43,C3,C3,C7,87,CB,C3,93, 42,07, ED, C3,C3,83, 03, 8AA 
1378 DATA 39,36, 3, 3C, 39, 36, 39, 36, 39, 33, 39, 33, 76, 39, 86, 352 
1388 DATA 30,30, 7C, 7C,FC, 33,33, 0F, 93, 42, 4F, 4F, 6F,CF, 03,525 
1398 DATA 42,9B,ED, E,8E,84,0C,CC,8C,8C,CC, 8C, 8C, 48, 89,696 
1489 DATA 84,CC, 88, 46,88, 49, 76,89, 05,84, BD, 99, 03, 42,89, 494 
1418 DATA 9C,D8,E8, 98,C8, 38,48, 28,08, 43,83, 93, 43, 43, C3, 52E 
1429 DATA 83,42,C7,8F,8F,C3,CF,CB,C3,83, 42,93, 76,30, 12,5D6 
1438 DATA 7C,FC,B9, 33,33, 76, 76,91,B9,8F,4F, 8F,8F,93,42,57E 
1449 DATA CF,CF,4F,CF,C3,CB,C3,BC, C3,96, 6D, 83,C3,D9, 3C,9E1 
1458 DATA 78,9C,84,8C,98,C8,84, 91,93, 88,93, 42, 49, 8C, 83, 378 
1469 DATA 42,688,89,91, 83,93, 00, 76,03,05,07,CB, 83,C3, 93, 362 
1478 DATA 42,CF,93,42,6F,9F,4F,CB,C3,C3, 83,83, 83, 93, 76,596 
1488 DATA 3C,9F,7C,FC, FC, 3C, 30, 2D, 76, 76,91, 3C, 33, 4F,CF, SDE 
1498 DATA CF,36,3C,6D, 76,CF,#4,CB,BC,CB,C3,C7,BC, 69, C3, 8BB 
1599 DATA 30,3, 38,9C,38,C8, 18, 48, BC, 83, 42,99, 63,92,91,274 
1518 DATA 91, 76,93,95,43,C7,CF,C3,C7,C3,C7,CB,76,C3, 84,774 
1528 DATA CB,CF,03, 42,6F,9F, 27,33, 27,33,8F,CF,C3,C3,83,618 
1538 DATA 93,93, 76,3C,0C, À2,76,88,84, A2, 14, 76,76, 81,8F, 392 
1549 DATA 93,42,9B, 4F,76,CF,8B,8E, 76,3C, 05,24, 48,89, 18, 4CB 
1558 DATA C#,CC, 9C, 48,C4,9C,CB,8C, 46, 24,89, 76,93,87,C3,529 
1569 DATA C3,C7,CB, 18, 76,CF,85, 76,9F,94, 76,33,07,0F,0F,511 
1578 DATA CF,CB,C3,C3,93, 76,3C,99, 77,08,89,B7,3F, A2, 89,5ED 
1588 DATA #3,42,B6,2D,8F,9F,8F,CF, CF, QC, 76,3C, 4, 2C,24,515 
1598 DATA 94,2C,CC, 18,64,C8,C4,3C, 83, 42,8C,CC, CC, 58, 3C, 6C5 
1689 DATA 38,B4,76,3C,8B,68,41,C3,C3,C7,CF,CF, 6F, 76, 0F, 749 
1618 DATA 94,1B, 76,33,95,FC,FC,B9,FC, 93, 42,33, 33,27, CF,61B 
1629 DATA CF,C3,C3,83,76,3C, 85, 7C, 79,49,F3,51,15,98,F3,658 
1638 DATA F3,76,98,04,BE, 33,9F,4F,CF,8F,CF,CF,8F,8E, C9, 715 
1649 DATA 24,34,7C, 7C,3C, 93, 42,B4,E4, 98, 2C, BD, B9, 38, 3C,571 
1658 DATA 3C,68,C8,F8,F8,E4,98, 38, 4C,98, 24, 39,64, CC, 83, 75B 
1669 DATA 42,0C,58,98,68, 8D, 8F, 1B, 33, 33, 76, 76,02, FC, 76,523 
1678 DATA 76,81, 76,FC,97, 7C, 7C,FC, FC, 33,33, 27, 4F,CF, C3, 74E 
1688 DATA 43,83,76,30C,27, 7C,FC, BC, 7C, 3C, 3C, TC, 76,3C,95,5FA 
1698 DATA 7C, 76,30, 4D, 7C, 76,FC,96, 30, 7C, 76,3C, 95, FC, 76,658 
1788 DATA 30C,98,76,3C, A3, 7C,FC, BC, 7C, 3C, 3C, TC, 76,3C,95,5EC 
1718 DATA 7C,76,3C, 4D,FC, 33,33, 76,FC, 94,27, 18,76, 76, 81,582 
1729 DATA FC,BC, 30, 7C, B9, 76, 3C, 99, 32, 32, 3C, 3C, 76, 32, 06,56€ 
1738 DATA 3C, 3C, 32, 32, 76, 3C, 94, 32, 32, 30, 3C, 32, 83, 42, 36,31B 





1749 DATA 30, 32, 32, 76, 30, 19,50, BC, 76, FC, 96, BC, 3C, 93, 42,538 
1758 DATA 7C, 30, 7C, FC, 76,33,84, 76, 76,91,FC, 93, 8F, 76, 76, 5F4 
1768 DATA 81,FC, FC, B9, 27,30, 83,42, 5E,5E, 76, 3C, 64, 5E, 5E, 588 
1178 DATA 3C,5E, 43, 42,30, 3C,5E, 93,42, 76,30, 84,5E,5E, 76, 3E2 
1789 DATA 30,4, 76,5E, 88, 76, C, 12, 7C, 7C, FC, FC, 33,33, 66, 59C 
1798 DATA 94,33,93, 42, 76,6F, 99, 1B, 76, 76,81, FC, B9, 76, 33, 4FD 
1889 DATA 84,18, 18, 27,8F, 33, 33,8F, BF, 3C, 4C,93, 42, 1C, OC, 1A9 
1848 DATA 3C, 30,40, 2C, 80,93, 42,10, 76,30, 84, 20,80, 3C, #3, 244 
1829 DATA 42,4C,83, 42,10, 3C, BC, 43, 42, 3C, 20, 8C, 3, 42, 76, 26B 
1838 DATA 3C, A, TC, FC, FC, 33,33, 27,33, 33,8F, 93, 42, LE, CC, 4EB 
1849 DATA CC, 4A,94, CC, 88, 45, 6F,4F,8F, CF, 4F, CF, 03, 42, 6F, 769 
1858 DATA 1B,27,4F,CF,9F,0F, 1B, 33,33, 27,27,8F,1B,1B,8F, 241 
1869 DATA 8F,CF,CF, 76, 30, 28, 7C, 3C, 30, FC, 76, 76,91, C8, B4,6E8 
1878 DATA 3C,B4,34,3C, 60, 68, 88,84, 49, 64,96, 38, B9, 88, 9C, 698 
1888 DATA CC, 48,89,C7,C7, 76, CF, 86, 8F,4F, CB, C7, CB, C3, C3, 8AE 
L898 DATA CF,0F,9F, 18, 27,0F,4F,0F,CF,9B,CF, CB, 76, 3C, 85,557 
1989 DATA 31,30, 30, 91,39, 31,83, 42, 34, 30, 31, 34, 3C, 3C, 39, 39F 
L918 DATA 31,30, 30, 31, 34, 30, 30,39, 31, 76, 3C, AA, 6C, B4, 3C, 498 
1929 DATA 30,64,60, 80,98, B4, 30, 3C, 78, B4, CC, AC, Ch, 48, 49, GA4 
1939 DATA 79,60,98,CC,98, 76,88,95,C1,C3,C3,C7,CF,CF,C3, 84A 
1949 DATA CF,C3,87,4B,C3,83, 42, C7,CF,9F, 33,0F,4F, CF,CF, 748 
1958 DATA C3,93, 42,39, 6D, 6, 39, 0, 3C, 36, 76, 39, 86, 76, 3C, 469 
1969 DATA #9, 7C,FC, 33, 27,27, FC, 33, 33, 32, 30, 38, 3C, 38, 76, 4F4 
1978 DATA 30,05, 78,B4, 30,93, 42,9C, ES, 76,C8, 94, 89, 03, 42, 4E9 
1989 DATA C8,C8, 86,98, 49,49, 96, 18,E4, 8C, 4C, 98, 00,49, C4,4E8 
1998 DATA 78,83,C3,93, 42, 8F, 27, 76,C3,87,CF,CF,1B, 4F,CF, EDS 
2899 DATA C3,C3,83, 93, 76, 3C, 19, 39, 66, 38, 3C, F#, 78, 3C, B4,642 
2818 DATA F8,84,F8,B8,FB, 4C,64,98, 80, 4C, C, 4C, 84,84, 8C, 7CB 
2828 DATA 6C, CC, 8C, C, SC, 48, 89, 49, 89,48, 6C, QC, 4C, CC, BC, 58B 
2838 DATA 4C,0C, 48, 48,08,93, 42, 76,83,05, 43,C3, C3, 8F, dB, 496 
2849 DATA C3,C3,C7,CF, 4F, 18, C3,43, 42,83, 83,43, 76,3C, 14, 5DD 
2858 DATA 7C, FC, B9, 33,93, 42,5E, AD, 8F,8F,8F, DC, BC, Ed, CC, 7A9 
2868 DATA 76, 3C, 54, B4, 76, 3C, 84, F9, 78,F8, 98, 18, CB, 93, 42,62D 
2878 DATA 8C,8C, CP, 84,98, 98,68, 48,88,89,98, C9, 49, B9, 76, A2 
2889 DATA 68,84,C8,C8,B4,88,81,93, 83,42, C3,C3,4F,C3,C3,5E4 





2898 DATA CF,6F,CF,CB,C7,CB, C3,83,83, 0, 20, 3C, LE, 4C, 2D, 77F 
2198 DATA 30, 1E, 30, 30, 76, 20,86, 40, 1E, 3, {E, 2D, 2D, TC, 76, 37B 
2118 DATA 33,94, 76,9F,96, 80, 78,64,8C, 8C, AC, BC, CC, 8C, EC, 3F6 
2128 DATA SC, 48,76, C8, 84,98, CB, 76, 89,05, CC, 64, 96,09, 84, 4FD 
2138 DATA 08,C9,C6,08,93, 42,84, C9,8, CB, 48, 76,89, 94, 8, 49C 
2149 DATA 93,83,C3,C3,87,CF,C3,43, 42, C7, CB, C3, C3, 93,93, 788 
2158 DATA 39,3C,93, 42,39, 3C, 39, 3C, 3C, 39, 30, 39, 39, 33, 39, 333 
2168 DATA 36, 39,39, 30, 30, 7C, FC, 33, #3, 42, 8F,0F, 1B,9F,4F, 3A7 
2178 DATA 8F,CF,93,42,8F, CB, 1E,C3,CF, 40,86, 96, 4C, CC, CC, BAG 
2188 DATA 8C,4C,88, 4C, C8, 98, 83, 42, 84, 98, 76, 08, 04, 49,09, 3B7 
2198 DATA 49,99,48,84,0C, 38, 48,98,88, 4C, A9, 88, 81, 47, 8B, 327 
2298 DATA 93,83,43,C3,93, 42, C7,8F, BF, CF, 4F, CB, 4B, C3,C3,678 
2218 DATA 93, 76,30, 12,7C,B9,33, 27,27, RC, 39, 8F,CF, 8F, BF, 46E 
2229 DATA 4F,CF, 83, 42,4F,CF, C7,CB, C3, 87, CB, 1E, 69, 43, C2, 7B4 
2238 DATA B4,3C, 20, 4C,9C, 0, CB, CB, 88, 76, 83,85, 76, 89, 85, 479 
2248 DATA 91,76,93,89,87,E9, C3, C7, CB, C7,CF, 93, 42,8F, OF, 6C1 
2258 DATA 4F,CF,C3,C3,83, 43, 93,93, 76, 3C, 11, 7C, 3, 4C, 27,54€ 
2268 DATA 76,76,81,FC,33,0F, BF, 4F, LE, 3,67, 76,CF, 44, C3, 566 
2278 DATA FC,C3,C7,C3,BC,63,D8, 30,3, EC,5C, AC, F4, CC, CO, 934 
2288 DATA 98,99,84, 92,93, 02, 02, 76,93,07,C3,6F, 4F, 1B, 4B, 31C 
2298 DATA C7,76,C3,95,CB, CF, 93, 42,6F,8F, LB, 33, 27, 33, 8F, 4B9 
2308 DATA CF,C3,C3,83, 93,83, 76, 3C, 8C, 76,08, 06, 14, 76, 76,518 
2318 DATA 81,9F,03,42,CF,4F,76,CF,94, 1B,4F,CF, BC, 4D, CF, 51D 
2328 DATA 8E, 34,76, 3C, #4, 64, 8C, 89, 89, C9, 03, 42, 89, CO, 03, 5B9 
2338 DATA 42,09,93,42,CC, 88, 08,93,93, 42,CB, 83,83, 76,C3, 425 
2348 DATA 94,0F,76,CF, 84, 4F,0F,43, 42, 1B, 76,33, 07, 6F, 27, 388 
2358 DATA CF,CF,C3,C3,93, 76, 30,08, 39, 24,89, 89, 51,9F, A2, 576 
2368 DATA 98,83, 42,86,89,8F,4F, CF, CF, 8E, 76, 30, 95, EP, 84,659 
2378 DATA 18,9C,64,4C,8C, CB, 34, B4, 30, 3C, 36, 4C, 96, 48, B4, 634 
2388 DATA 38,98,B8, 76,38,84,F8,93, 42, 3C, 03, 42, 38, CP,C3, 598 
2398 DATA CF,C7,CF,0F,93, 42, 1B,9F, 76, 33,96, 76, 76,81, 76, 4F5 
2498 DATA FC, 85,89, 33,33, 9F, 4F, CF, CB, 83,83, 76, 3C, 96, 28,57E 
2418 DATA 51,F3,51,15, 76,98, 97, 7E,77,8F,4F,CF, 8F,CF, 03, 524 
2428 DATA 42,6F,4F,9A, 10,30, 64, 3C, B4, 3C, 30, B4, 48, 38, 64,576 
2438 DATA 1C, 78, 78,B4,38,CB,98, F8, BB, 79,F8,E4, 48, 84, 8C, 784 








2449 DATA 9C,CC,8C, 4C, 8C, 79,E4, 78, 4C, 9F, 1B, 39, 93,42, 76,560 
2458 DATA 76,01,33, 76, 76,91, 76,FC,96,3C, 76,FC, 84, 33, 33,527 
2468 DATA 27,4F,CF,C3,C3,83, 33,93, 42,27, 0F, 1B,0F,0F, 1B,458 
2478 DATA 1B,33,33, 76, 76,91, FC, FC, 76,33, 94,27, 27, 33, 27, 4BB 
2489 DATA 1B, 76,76,91,B9,33,8F,3C, 93, 42, 0F,0F, 76,3C, 94,358 
2498 DATA 8F,9F,3C,9F,93,42, 1E, 2D,6F,93,42,76,3C, 84, 8F, 212 
2599 DATA 8F,76,3C,94,76,9F, 88, 76,3C, 15, 7C, B9, 33, 26,91, 438 
2519 DATA 33,93,42,0F,0F, 18, 76,0F,04,1B, LB, 33, 76, 76,81, 299 
2529 DATA FC,B9, 76,33,#4,27, 33,27, 9F, 33, B9, 33, OF, 3C, 93, 45F 
2535 DATA 42,5E,5E, 76,30, 94,5E,5E, 3C,5E, #3, 42, 3C, 3C,5E, 425 
2549 DATA 93,42,76,3C,94,5E,5E, 76, 3C, 94, 76,5E, 08, 76, 3C, 3FB 
2558 DATA 12,7C, 7C,FC, FC, 33,33,66,91, 33,93, 42, 76, 8F, 89,565 
2569 DATA 1B, 76,76,91,FC,B9, 76,33, 94, 1B, 1B, 27, 0F, 76,3C, 488 
2578 DATA 99,76,30C,61, 7C, 76,FC,96,3C,7C, 76,3C,85,FC, 76,5E8 
2589 DATA 30, 4D,FC,B9, 33, 76, 76,41, FC, 7C, FC, 33, 1B, 76, 76, 78C 
2598 DATA 91,FC,BC, 30, 7C, 33, 3C, 93, 42, 31,31, 76,3C, 84, 31, 46E 
2698 DATA 31,30, 3, 39, 76,31, 84, 34, 3C, 3C, 76,31, 98, 3C, 3C, 369 
2619 DATA 39,31,93,42, 76,30, 1B,7C,5C, FC, FC, 33,FC, 76, 76,667 
2628 DATA 81,FC,93,42,7C, 3C, 3C, 7C, 3C, 3C, FC, 76, 33,94, 76,549 
2638 DATA 76,91,FC,33,9F,33,FC,FC,B9,27,3C, 93, 42, AD, AD, 69B 
2649 DATA 76,3C,84, AD, AD, 3C, AD, AD, BC, 3C, 3C, 2D, AD, AD, 76,6D7 
2658 DATA 3C,94, AD, AD, 76,3, 94,2, 76, AD, 86, BC, 76,3C, 11,525 
2668 DATA 7C,BC,FC,FC,B9,33, 27,8E, 8D, 76, 0F, 0C, 1B,33, 76,633 
2678 DATA 76,91, 76,33,05, 1B, 1B,9F,9F,1B,33,8F, BF, 3C, BC, 2AD 
2688 DATA ÿ3,42,9C, 80, 3C,3C, 8C, 2C, 8C, 93, 42, QC, 76, 3C, 94, 4CD 
2698 DATA 2C,8C, 30,93, 42, 76,80, 94, 20, 8C, 83, 42,9C, 2C, BC, 499 
2789 DATA 63, 42,76,3C, BA, BC, FC, B9, 33,33, 8D, 33, 33, 9F, 93, 4DD 
2718 DATA 42,CC, 65, 4A, 88,34, B8,89,C5,6F,8F,9F,8F,76,CF, 70F 
2729 DATA 84,8F,1B,27,CF,CF,8F,9F, 1B, 76, 33,94, 0F,1B,0F,412 
2738 DATA 8F,4F,CF,CF,76,3C,28,7C,3C,7C,FC,F4,94, 3C, 3C, 796 
2749 DATA 6C,30,78,48,C9,89, 89,90, C4, CC, 18,E4, 89,84, 84, 6BC 
21758 DATA 96,99,03,07,C7,76,CF,95,9F,4F,CB,CF,CB,C7,C3, 7FÈ 
2769 DATA C7,8F,8F,33,27,8F,4F,6F,CF,CF,CB, CB, 76,3C, 95,697 
2778 DATA 76,32,04,38, 36, 3C, 38, 36, 3C, 32, 32, 36, 3, 38, 32, 34 
2789 DATA 32,30, 76,32, 64,38, 32,03, 42,36, 3C, 93, 42, TC, BC, 3BB 
2798 DATA 3C,FC,68,3C, 78,3C,FC, 2C, 1C,3C, 30, 78,F8, 83, 42,5F1 
289 DATA B4,3C,E8,98,8C,64, 44,69, C9,58, 09, C8, CG,98, 99, 5A4 
2818 DATA 41,03,03,07,CF,CF,C3,C7,CB,C7,CB,C7,C3, 83, 42,9E2 
2829 DATA C7,8F,33,9F,CF, 93, 42, C3, 83,83, 30, 39, 3C, 39, 3C, 598 
2838 DATA 3C,36, 39, 33, 39, 33, 39, 39, 76,3C, 47, BC, 3C, 7C, 33, 41C 
2849 DATA 93,42, 1B, 33, 33, 32,36, 3C, 34, 3C, 93, 42, 78, 3C, 93, 2D6 
2858 DATA 42,4C,38,38,8C,8C, 1C,28,C8,48,48, 99,9, 49,89, 3C2 
2869 DATA 86,99,69,88,49,99,90,F8, B9,64, C9, 0C, 99,84, 94,5B9 
2878 DATA 6C,93,C3,93, 42,9B,B9,C3,C3,CB,76,C3,84,CF,8F, 7B7 
2889 DATA 1B,4F,CB,C3,C3,93, 893,69, C3,69, 93,42, C3,69,C3,68A 
2899 DATA 69,C3,69,C3,3C, 99, 42,96, 3C,3C,69,C3,69,C3, 69, 6A8 
2999 DATA C3,3C, 7C,27,8E, 36, FO,F9, B4,B9, BG, DB, 64, 8C, 98, 83A 
2918 DATA 84,80, 4C,8C, 4C,9C, 4C, 84, 8C, 48, 48,84, BC, 48, 4C, 458 
2929 DATA 39,64,C9,C9,39,B9, 8C, 48, C8, àC, 48, 08, 89, 76, 98,592 
2938 DATA 84,91,01,93,93,42,43,C3,C3,87,4F,C3, 83, 42, C7, 4BC 
2948 DATA 8F,8F,8F,C3,C3,43, 43,93, 76,3C, 15, FC, B9, 33,93,5EE 
2958 DATA 42,1B,9F,9F,68F,9F,5E, 3C, 78,34, 76, 3C, 84, 38, 3C, 381 
2969 DATA F9,3C,30C, 76,F0,94,B4,78,E4,48,CD, 44, 48,08, CB, 736 
2978 DATA 84,E9,CC,EB,8C,CA,09,04,88,08,83, 42,89 ,C9, C9, 725 
2989 DATA 98,E8,80,93, 93,42, 43,C3,8F,C3,C3,C7, 4F,CF,C3, 77B 
2998 DATA C3,CB,C3,93,83,69,C3,3C,96,69, C3, 3C, 96, 30, 3C, 74B 
3969 DATA 76,69,86,3C,96,69,C3, 69, 69, 39, 33,27, 33, 27, 0F, 4B1 
3919 DATA 9F,4F,9F,CF,9F,9E, 18,64, 4C,8C,48,C8,8C, BC, CO, 48D 
3929 DATA 9C,76,C8,86, 88,09, 80,C8,88,C8, 44, 18, 08,68, 84, 448 
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3838 DATA C9, 93,42, 09,93, 42,C8,CB, 08, 04,08, 09,93, 42, 81, 31C 
3949 DATA 93,83, 42,C3, C3, C7,8F, CB, 76, C3, 06,43, 93, 2D, 3C, 55D 
3858 DATA 3C, 1E, 20, 30, 2, 80,0, 2D, 80, 76, 20, 87, 30, 3C, FC, 3EF 
3968 DATA FC,B9,33,27,27,8F,8F,4F, 4F, 76, CF, 45, CB, C3, C3, 68D 
3979 DATA CB,CB,C3,C3, 93, 02, 42, 0C, 80, 98, CB, 18,68, 89, CO, 603 
3989 DATA 88,C8,C8, 76, 00,05, 49, C4, 89,99, 04, 4C, CB, CO, 49,593 
3898 DATA 99,48,06,09,91,96,9B, 93,83, 76,C3,95, 8F, F, 8F, 2D8 
3199 DATA 4F,6F,C3,93, 42,93, 76, 30, 12, 7C, B9, 33, 83, 42, 3C, 496 
3118 DATA 7C,0F,6F,0F,93, 42,CF,93, 42, ED, CF, C3, 83, 42, C7, 69D 
3128 DATA 4B,96,69,C3, C2, 3C, 30, 24, 8, 48, 0, 49, CO, 89, 91,548 
3139 DATA 76,03,95,83,43, 76,03, 98, 43,83, 83, 83, 43, B, 43, 362 
3148 DATA D6,CB,C7,CF,CF,8F,8F,0F, 4F, 4F,C3,C3, 76,93, 04, 754 
3158 DATA 76,3C,9F, 7C, BC, FC, 30, BC, 27, 5E, 39, 33, 27, 4F,CB,61F 
3168 DATA 9E,3C, 48, 76,CF,94,C3,8F, C3, C7, CB, D6, C2,96, 30, 87F 
3178 DATA 30,24, 1C, A4,C4, CC, CP, 88, 48, 84,93, 02, 82, 23, 51, 4BF 
3188 DATA 76,93,85,91,83,C7, 8F, 1E, ED, 76,C3,05, CB, CF, CF, 694 
3199 DATA 8F,9F,03,42, 76,33, 94, 0F, CF, C3, C3, 83, 83, 83, 76, 4F3 
3299 DATA 30,68, 70,76, 80,06, 14, 76, 76,91,0F,03, 42, 76, CF, 3DA 
3218 DATA 97,98,F4,93, 42,80, 18, 30, 78, 3C, 3, A4, ÊC, CO, CO, 554 
3228 DATA 6C,6C, 86, 76,80, 96, C9, 99, 99,88, 09,81, 03,93, 39, 21C 
3238 DATA 93,43, 76,C3,94,6F,4F,CF,6F, 76,9F, 85, 1B, 76, 33, 59D 
3248 DATA 87,27,27,CF,CF, C3, 83,93, 76, 3C, 06, TC, 3C, 2A, 08, 456 
3259 DATA 03,42, F3,3F, A2, 08,93, 42,B6, 89, 8F,8F,4F,4F,8E, 517 
3268 DATA 99,76,3C,94, CD, 80,58, B4, CC, FC, FO, 4C, 30, 78, B4, 786 
3278 DATA 3C,3C,64,98,8C, 9C, 38, 24, DB, F8, 93, 42, 39,64, CC, 5C9 
3288 DATA 4C,0C,98, F8, 3C,E1, 41, CF, 83, 42, 6F,0F, OF, 16, 33,568 
3298 DATA 48,89, 76,FC, 66, 33, 33, 0F,4F, CF, C3, 83,83, 76, 30, 5C7 
3399 DATA 85,7C,28,51,F3, A2, 15, 76,88,97,11,22,0F,CF,CF, 581 
3318 DATA 4F,CF, 03,42, 1B, 1A,FB, 30,83, 42, 38, 3C, 83, 42, 78, 43A 
3328 DATA 38,3C,B8,B4, 78, 79, 3C, 78, C9, 18, 48, C8, DB, FB, Aû, 780 
3338 DATA 4C,CC, CC, 0C, 93, 42, C8, 09,64,64,F8, C4, BF, 76, 33,629 
3348 DATA 64, 76,FC, 97, BC, 3C, 83, 42, FC, 93, 42, B9, 33, 27, 0F, 51D 
3358 DATA CB, C3,C3,83,CF,CF,C3,CF, 76,30, 8B, C, 30, 83, 42, 78B 
3368 DATA 60, 1C, 76,30, #9, 4C, 10, 76, 3C, 9, EC, 3C, 78, 79, 3C, 4B6 
3378 DATA F8, 38, CC,58,C8, 48, 4C,48,C8,CA, 80, 83, 42, 10, E4, GAQ 
3388 DATA CC, 18,C8,99,69,41,C3,93, 42, CF, CF, CB, CF, CF, 4F, 743 
3398 DATA C3,93,67,C3,C3, C7, C7, 8F,9F,33,8F,8F, 4F, CB, CB, 825 
3498 DATA C3,CB, 76,30, 85, CC, 83, 42, 9, 6C, 9C, 30, BC, QC, 3C, G7A 
3418 DATA CC, 9C, 30, 30, 60, CC, 3C, 3, CC, 90, 3C, 30, 6C, CC, 43, GAB 
3428 DATA 42,90, 76,3C, 88,99, 30, 3, E4,6C, 8C, 84, 48, 19, BC, 564 
3438 DATA C8,6C, C9, 08, CB, 88,48, 49, 79,39, 80,58, CO, 80, 09,618 
3448 DATA 48,C1,76,C3,84,4F,CF,CB, CF,C7,93,67, C3, 93, 42, 7EF 
3458 DATA C7,CF,9F,33,0F,6F, 4F,CB,CB,C3,C3, 76, 30, 85, 98, 739 
3468 DATA 83, 42,90, 38,98, 93, 42,90, 3C, 98, 9C, 3C, 3C, 38, 76, 528 
3478 DATA 3C, 08, 76,3C,5F, FC, 93, 42, BC, B9, 33, 33, 76, FC, 84, 5DF 
3488 DATA BC, 76,30, 94, B9, 76, 3C, 4D, FC, B9, 33, 33, FC, 3C, FC, 779 
3498 DATA 33,18, 76, 76,91, FC,BC, 30, 7C, 33,30, 83, 42, 33, 33, 4C5 
3599 DATA 76,3C,84, 33,33, 3C, 83,42, 76,33, 94, 3C, 03, 42, 76, 31 
3518 DATA 33,98,30, 93,42, 33,93, 42, 36, 76,30, 1A, FC, SC, FC, 48A 
3528 DATA FC, 33,76, 76,82, FC, BO, 76, 76,81, 76, FC, 94, BC, 3C, 72D 
3538 DATA FC, 76, 33,95, 76, 76,91, B9, 27, 33, FC, FC, B9, 27, 3C, 6RE 
3548 DATA 83,42,FC, FC, 76,30, 84, FC, FC, 3C, FC, FC, 76, 3C, O4, 7D5 
3558 DATA FC, FC, 76,3C,04,FC, FC, 76,30, 85, 76, FC, 86, 76, 3C, 787 
3568 DATA 19,BC, 7C, FC, 83, 42, 89, 33, 33, 27, 80,91, 76,9F, 0C, 57D 
3578 DATA 1B, 76,33,97,27,1B,27,0F, 1B,27,8F, 4F, 76, 30,85, 29 
3589 DATA 4C,3C, 30, AC, 76, 30, 89,6, àC, 76, 3C, 06, 4C, BC, AC, 43F 
3598 DATA 1C,6C, 10, 76,30, 00, BC, 3C, 7C, FC, FC, 33, dE, 4C, BF, SAA 
3698 DATA 93,42,C9,C8, C4, B4, Eû, 89, 34, BB, C9, 05, 87, CF, 8F, 837 
361 DATA 0F,CF,4F,CF,CF,6F, 33, 27, CF, 93, 42, 0F, 8F, 33, 83,510 





3629 DATA 42,1B,4F,1B,8F,9F, 4F,CF,CF, 76,3C,2A, 7C,FC,EC,612 
3638 DATA 74,76,3C,94,2C,84,C8,48,98,03, 42,99, 8C, 69,64, 487 
3649 DATA 58,88,49,C9,C3,93,42,C7,C7,CF, 93,42, 8F,4F,CB, 72B 
3658 DATA C7,CF,C3,C7,CF,CF,9F,1B,27,CF,8F,8F,CF,CF,C3, BDD 
3669 DATA CF,76,30C,95,33,93, 42, 36, 39, 36, 3C, 39, 36, 30, 39, 3C3 
3678 DATA 33,36, 3C, 3C, 33,33, 3C, 76,33, 04, 39, 33, 53, 42, 36, 317 
3689 DATA 3C,93,42,78,F8,B8, CC, 4C, B4,3C, 93, 42,2C,94, 48, 5EE 
3698 DATA 76,09,96,49,C8,C8,98,9C,C4,88,9C,58, 89, 84, C9, 53C 
3788 DATA 68,98,48,C1,03,C3,C7,C3,CB,C7,CB,C3,CF,87,CB,952 
3718 DATA C3,C3,C7,6F,1B,9F,CF,CF,CB,C3, 83,93, 76, 6D, 84, 79F 
3728 DATA 3C,3C,1E,3C, 2D,3C, 2D,83, 42, 76,30, 96, 7C, FC, 3C, 419 
3738 DATA 3C,B9,33, 33,27, 1A, 33, 34,30, 3C,9C, 3C, 3C, 78, 39, 437 
3749 DATA 78,F8,F08,76,3C,95, 78,E9, 48,C8, 49, 49,09,49, 00,627 
3758 DATA 88,C9,89,98,88,C4,B4,F9, 76, D8, 98, 49,C9, 84, 49, 7CC 
3768 DATA 8C,93,83,C3,C3,8F, 39,C3,CF,CF, 76,C3,04,C7,CF,814 
3778 DATA 1B,4F,CB,CB,83,93,93,2D,93,42,8F, 2D,3C, 3C, 1E, 3CD 
3789 DATA 76,2D,84,3C,3C, 2D, 2D, 3C, 30, 76, 2D, 96, BC, 3C, B9, 44B 
3798 DATA 33,99,F8,78,3C,E4,CC,84,8C,9C,CC, BC, CC, 4C, BC, 6B8 
3899 DATA 4C,64,4C, 39,64, 8C, BC, 84, 8C, 48, 99,99, D4,C4, 78,438 
3819 DATA B4,30C,3C,B9,6C, 48,C8,98,93,42,C0,86,80,84,91,4FA 
3829 DATA 93,93,42,43,C3,93,42,4F,C3,C3,C7,CF,6F,9F,CF,66B 
3838 DATA C3,C3,87,83,93, 76,3C,15,FC, 76, 76,91, 33,83, 42,5BB 
3849 DATA 27,6F,8F,CF,8F,4E, 76,3C, 94,38, B4,3C,64,FD,B4,557 
3858 DATA 78,F8,F4, 79,76,F8,64,E4,0C, 48,C8,4B, 18,64, 18, 796 
3868 DATA 4C,58,24,39,C8,49,C9,C9, 89,93, 42,48, 48,45, 88, 58D 
3879 DATA 24,99,93,93, 42,43,C3,8F,CB,C3,C7,CF,CB,C3,C3, 776 
3888 DATA C7,C3,C3,83,76,3C,16, 7C, 33,93, 42,27, 0F,8F,4F,529 
3898 DATA 8F,4F,8F,9F,8E,8C,CC,8C,48,C4,24,48,C9,84,CD, 76A 
39906 DATA 93,42,84,C8,89,88, 66, 76, 49,05, 99, 88, 89, CD, 48, 4DC 
3919 DATA 49,69,95,98,48,C9,48,98,94, 76,00, 05,83,83,C3, 358 
3928 DATA 93,42,C7,8F,C7,76,C3,85, 683,43, 83,69, 3C, 3C,96, 668 
3938 DATA 69,3C,69,C3,69,C3,69,C3, 76,69, 95,96, 3C, 7C,FC, 757 
3949 DATA FC, 33,33,76,8F,95,4F, 76,CF,05,CB,C3,C7,CF,CB, 774 
3958 DATA C3,36,C3, 82, 42,C8,98,44,38,CC, 4B,C8, 93, 42,84,5D1 
3969 DATA C9,8C,76,88,88,C4, 74,48, 89,49, 03, 42,01,92,93,355 
3978 DATA 96,8B,93,43,76,C3,94,CF,8F,CF,CF,CB,CF,C3,C3,8C8 
3988 DATA 93,93,76,3C, 12,39, 76,33, 94, BC, 7C, CF, 9F,0F, 33,498 
3998 DATA 27,CF,93,42,6D,CB,C3,C7,C3,C3,CB,96, 8B, 43, D6, 888 
4968 DATA 3C,3C,8C,38,B9,48,C9,93, 42,91, 76,93, 07,83, 76, 4AB 
4818 DATA 83,97,C7,8B,93,93,C3,93,42,87,C7,C7,CF,CF, 76,693 
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4928 DATA 8F,84,CF,CB, C3, 76, 83,84, 76, 3C, 13,FC, OF, 1B, 27, #FF 
1938 DATA 36,39,CF, CF, 9B, 7C, 76,CF,95, CB, CB, C3, 83, 42, C7, 703 
4gg DATA CB,9C,3C, 3C, 8C, 30,68, 84, BC, 84, 89, 48, 8C, 99, 76, 55B 
1958 DATA 93,68, 43, 6F,36, 60, 76, C3,#4, 76,CF, 84, 8F, 83, 42, 45D 
4869 DATA 1B,33,93, 42, CF,9F, CF,CB, C3, C3, 83,43, 76, 3C, 08,554 
4478 DATA 79,96,51,76,98,84,54, 33,0F, 93,42, 76,CF, 84, BE, 3F6 
4988 DATA 10, 76,3C,85, A4, 74, BC, 34, 3C, 2C, 48, CB, 4C, 8C, BC, 52F 
4498 DATA 0C, 48,4, 8C, 48, 76, C8, 97,88, 88,93, 43,60, 83, 43, 36A 
4198 DATA C3,83,42,CF,8F,4F,CF,8F, 76,0F, 04, 1B, 33,93, 42, 52F 
4118 DATA 76,76,91,33,FC, 76, 76,81, 33, 27,27, 4F,CF,C3,C3,62E 
4128 DATA #3, 76,30, 46,70, BC, 76,99, 04, F3, 7B, 42, 99,03, 42, 4C2 
4138 DATA B6,89,9F,9F,CF, CF, 4F,58, DA, B4, 3C, 68, 84, 48, DB, 7A8 
4149 DATA 6C, 4C, BC, 2C, 18, 30, 3C, 78, 3C, 3C, 38, C4, 48, 24, CC, 554 
4158 DATA 8C, 75,88, CC, CC, 4C, BC, CC, 98, 38, 8C, 48, AC, BC, CB, 7DC 
4169 DATA CF,83,42,0F,83, 42, 76,33, 8, 76, 76,81, 76, FC, 05, 47D. 
4178 DATA B9, 33,33, 6F,4F, CB, C3, 83,93, 76,3, 85, 7C, 28, 51,53D 
4188 DATA F3,88,15,76,88,97,11, A4, 76,CF,96,8F, 4F, CF, 4C, 584 
4198 DATA B4,20,B4, 76,30, 94, B4,B4, F8, 78,78, 3, 79, F9, B4, 7DA 
4289 DATA 48,58,C4, 38,58, 76, F8, 89, 38, BC, B4,98, 44, 1B, 33, 5F1 
4218 DATA 93, 42,76, FC, 98, 7C, 30,93, 42, BC, 7C, FC, 33, 33, 8F, 565 
4229 DATA 4F,CB,C3,C3,83, 39, 83, 42, 3C, FC, BC, B9, B9, 66, SA, 747 
1239 DATA 64,89,64,4C, 83,42, 8C, CC, 4C, 34, 3C, 3C, B4, 78, D6, 61D 
4249 DATA F8,F8,D8,38, 38,64, BC, CA, CO, 08, 88, 48, GC, 98, 78, 6DC 
4258 DATA B4,78,E4,0C,68, 68,93, 42, C8, 89,04, 88, 82, 81, 93, 383 
4268 DATA 93,43,43,C3,8F,C3,C3,C7,CF,8F,9F, CF, C3, C3,87, 871 
4278 DATA 8B, 83,39, 33, 39, 39, 3C, 39, 3C, 36, 39, 33, 39, 36, 3C, 2EA 
4289 DATA #3, 42,36, 36, 3C, 39, 3C, 39, 33, 39, 3C, 76, 76,81, 30, 36€ 
4298 DATA 7C, 39,27, 4E,8C, 60, 4C, 80, CC, 39,F8,E4, 64, 34, 78,5FA 
4389 DATA 98,B4,3C, 8C, 39,80, 58,64, BC, 4C, 8C, 48, CB, 89, 68,578 
4318 DATA 46,89,08,89,84,98,E4, CC, 4C, 98, 98,83, 42, 49, 81, 466 
4329 DATA 4C,98,51,83,83,43,C3,C3, BF, CB,C3,CB, CF, CF, 0F,671 
4338 DATA CF,CB,C3,96,48, 93, 76, 2D, 64, 30, 20, 3C, LE, 76, 2D,54E 
4348 DATA 4,30, 30, 2D, 2D, 3C, 3C, 2D, 83, 42, &C, 2D, 20, 33, BC, 345 
4358 DATA 3C,B9,9F,8F,8C, 80, CC, 98, CC, F8, F8, 8C, BB, B4, 24, 7CF 
4369 DATA 58, 76,3C, 98, 76, 3C, 68, 7C, 33, 33,FC, 43, 42,9, 33, 52B 
1378 DATA 93,42, 76, 76,91, FC, BC, 76, 3C, #4, B9, 3C, 83, 42, 76,558 
4388 DATA #C,87,3C,3C, #C, 8C, 76, 3C, 04, 8C, BC, 3C, BC, 6, 76, 23B 
1398 DATA 3C,84,8C, 80, 3, 3C, 76,80, 66, 76, 3C, 28, 7C, B9, 33, 394 
4498 DATA 33,76,76,81,FC, FC, B9, 8F, 76, 76,91, FC, BC, 30, 7C, 73D 
4418 DATA 33,30, 93, 42, 76, C3, 98, 30, 83, 42, 76,C3, 84, 30, 83, 3F2 





4428 DATA 42,69, 76,C3, 86,96, 30, 93, 42,69, C3, 93, 42, 76, 3C, 524 
4438 DATA 19, FC, FC, D4, 9, 76,33, 96, 76, 76,81, FC, FC, BC, 7C, 86C 
4448 DATA FC, B9, 76,33,85,FC, 27, 18, FC, FC, BO, 27, 76, 30, 34, 75F 
4458 DATA FC, 93,42, 89,33, 76, 76,01, 33,33, 27, 4€, 8C, 85, 76, 57C 
4468 DATA 8F,0C, 1B, 1B, 76,33, 86, 18, 1B,27,9F, 1B,27,8F, 4F, 26C 
447 DATA 30,60, CC, 3, 30, CC, 6C, CC, CC, GC, CC, 93, 42, 9C, 76, 74B 
4489 DATA 30,94,6C,CC, 30, 93, 42, CC, 30, 3C, CC, 3C, CC, CC, 3,619 
4498 DATA 43, 42, CC,9C, 76,30, 99, 76,FC, 84, 33, 8F, 48, CB, 80,535 
4588 DATA 8F,8E, Da, CA, 30, 3C, 36, CE, 34,B8, CB, 45, 87, CF, BF, 6F7 
4518 DATA 76,CF,05, 18,89, 4F, CB, CF, 93, 42, 9F, 1B, 33, 3, 42, 4ËE 
4528 DATA 4F,9B,9F,F,CF,CF, CB, 76, 30,85, 0C, 03, 42, 1C, 2C, 4C1 
4538 DATA 40,03, 42,0, 20,00, 03, 42,30, 0C, 93, 42, 1C, 80, 1C, 1DB 
4549 DATA 30, 30, 2C, 80,83, 42, 10, 76, 3,99, EC, 24, 79, 38, BA, 439 
4558 DATA 38,30, 3, 78, CP, 00, 84, 08, 09,88, 98, 49,69, 98, CC, 4FC 
4569 DATA 58,88,99,41,61,C3,93, 42, 76,CF, 05, 4F, CB, C7, 4F,5FC 
4578 DATA C3,C3,C7,CF,9F,0F, 27, 4F,8F,CF, 93, 42,C3, C7, 76,603 
4589 DATA 30, 28, 7C, BC, 30, 4, DB, 3C, 78, 76, 30,45, 2C, 94, 48,527 
4598 DATA 49,49, 76,80,05, 28,88,00, 48, 18,88, 80,58, 89, 84, 45B 
4689 DATA 88,89, 9,20, C9,C3,C3,C7, CF, CF, C7, CB, C3, C7, 9B, 962 
4618 DATA CB,C3,C3,C7,6F, 1B, 27,CF,CF, CB, C3, 83,93, 69, 69, B6D 
4628 DATA C3,69,3C,69, C3, 69, C3,69, C3, 69, C3, 76, 30, 46, 7C, 74C 
4638 DATA 7C, 3, 3C, 39, 27, 33,33, 1B, 32, 30, 3C, 78, 34, E4, 78, 487 
4649 DATA B4,F8,F9,39, 14,98, 39, CC, 8C,98, 58,69, 98,88, CB, 7A9 
4659 DATA 89, C8, 49,80, 29,88,98,49,88,84, DB, B8, F8, DB, CB, 77C 
4668 DATA CB,98,84,49,C8,03, 93,43, C3, CF, 4F,C3, CF, 8F, CB, 75A 
4678 DATA C3,93,42,CF,CF,9F,4F,C7,CB, 83, 83,93, 76,39, 05,653 
4688 DATA 33,30, 36, 76, 39, 84, 3C, 93, 42, 36, 3, 30, 39, 3C, 39, 335 
4699 DATA 93,42, 3C, FC, BC, B9, B9, 66, 5A,64,B8, 64, 8C, 03, 42, 634 
4788 DATA 8C,CC, 4C, 34, 30, 3C, B4, 78,8, F8, FA, D8, 39, 39, 64, 709 
4718 DATA 8C,C9, C8, 08,99, 49,00, 98, 78, Ba, 78, E4, 8C, 89, 89, 5FC 
4729 DATA 93,42,C8,09, 84,98, 82,01, 03,93, 43,43, C3,8F, C3, 385 
4738 DATA C3,C7,CF,8F,9F,CF, C3, C3, 87,8, 83, 76, 30, 15, 7C, 724 
4749 DATA B9,33,83, 42, 27,8F,6F,GF,0F, GB, 30, 3C, FB, 3C, 38, 47B 
4758 DATA D8, CC, 38,39, 24,90, 4C, CB, CA, 88, CB, 84, BC, CC, 64, ECB 
4769 DATA 98,64,98, 48, CC, DA, 9C, F4, 4,64, CB, 84, 89, 76, 09, EE 
4778 DATA 04, 49,98, 84, CB, DB, 88,03, 93, 42, 43, C3, CT, CB, C3, 713 
4789 DATA C7,CF,CB,C3,C3, C7, C3, C3, 83, 76, 3, 16, FC, 33, 93, 8B1 
4798 DATA 42,0F,03,42,4F,6F, 4F, CF, 9F,64, AC, 64,64, BC, 84, 529 
4869 DATA C, 48,48, 00, 84, AC, 48, CO, 89, 76, 08,05, CB, 94, 48, 447 
4818 DATA 84, CC, 48,48, C8, 88, 88, 08, 89,C8, 49, 00, 76, 80, 87,531 
4829 DATA 83,03,43,C3,83, 42,8F,4F, CB, 76, C3,45, C7, 83, 76,5F8 
4838 DATA 3C, 13, 7C,FC,B9, 33, 33, 27, 76,9F, 84, 4F, 76, CF, 85, 52F 
4849 DATA CB,C7,8F, AD, C3, C3, 27, C3, 83, 42, C2, 18, A4, 84, 84, 789 
4859 DATA C9, CB, 84,03, 42,80, 76,99, 07, 49,98, 8C, 89, 80, 89, 5AE 
4869 DATA 93,42,01,03, 93,07, 83,93, 76,C3, 95, C7, 8F, 4F, C3, 47F 
4878 DATA C7,CB, C3,C3,83,93, 76, C, 11, 7C, 7C, B9, 33, 33, 76,6EE 
4888 DATA 76,41,3C,7C,CF, 4F, 1B, 33, 27,CF, 93, 42, CB, CB, CF, 638 
4898 DATA C3,93, 42,07, C3, 83, C3, B4, 30, 38, 4C, 69, 49, 76, 39, 692 
4909 DATA da,03,83, 42,81, 76, 03, 8C, DE, 8B, 03, 76, C3, 45, C7, 443 
4919 DATA CF,CF,8F, 76,9F,94,CF,CB,C3, 76,83, 84, 76, 3C, 8F,651 
4928 DATA FC, 37,B3,BC, 33, 27,9F,0F, 76, 76,91, 1C, CF, 83, 42, 507 
4938 DATA 4F,76,CF,97,C7,C3,93, 42, Ba, EB, B4, 78, 8C, 7C, 69, 712 
4949 DATA 84,8C, C,88, 8, 48, 89, 92, 76,83, 0B, 87, 36, 2D, C3, 4D4 
4958 DATA C3, C7, 76,CF,05,0F,03, 42, 1B, 33,83, 42,67, 0F, 4F, 48 
4969 DATA CF,C3,C3,83,83, 76,3C,9B, AB, 09, 3F, A2, 09, 83, 42, 4EG 
4978 DATA 14,20,6F,0F,4F,CF,4F,CF, CF, 30, 30, 30, 78, F9, F4, GEE 
4989 DATA B4,4C,98,F9,98, B4, 48, C9, 48, CB, 93, 42, 8C, CB, 48, 73D 
4998 DATA CH, 40, 93,42, CC, 8C, 9,3, 42, 84,88, 09, 83, BB, 83, d4F 
5989 DATA 43,C3,C3,CF, 93, 42,8F,F, 8Ÿ,8F, #3, 42, 1B, 1B, 76, 54 
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5818 DATA 33,04, 76, 76,91,89, 76, 76,81, 33, 33,27, 8F,CB, C3, 4F4 
5928 DATA C3,3,76,3C, 87, 37, 76,08, 84,B7,F3, A2, 08,93, 42, 4C1 
5838 DATA 3E,77,9F,0F,4F, 4F,CF, BE, 3C,E5, 30,68, 4C, 4C, B4, 5DF 
549 DATA 3C,43,42,64,64, 79, 3C, 3C, B4, 3C, 3C, 69, 84, 39, 6C, 4DD 
5858 DATA CC, 98, 78, F9, 38,98, CC, 4C, 76, CC, 84, 39,69, B9, CF, 749 
5668 DATA CF,8F,9F, 18, 1B, 76, 33,94, B9, 76, 76,92, B9, 76,FC, 622 
5478 DATA 97,33,33, 4F,4F,CB,C3,83,93, 76,30, 95, 7C, A6, 51,54B 
5989 DATA 76,60,94,B7, 78, 76, 89,04, 7E, 22,67, 76,CF, 44, 4F, 4C5 
5898 DATA CF,8F,CF,9E, 3C, 7C, 7C, 30, BC, 3, C, 78, 78, 30, 78,713 
5199 DATA 38,30, 78,F0,F8,E8, 58, D6, 30,58, 76,F4, 0C,64, 49, 76A 
5118 DATA 99, 76,33,84,FC, 93, 42,89, BC, 7C, FC, 76,30, 84, BC, GE6 
5128 DATA FC, FC, 33, 33,8F, 4F,C3, CB, C3,93, 8C, 4C, 99, CB, 18,699 
5138 DATA 69,89, C8,89,C8, C9, 76,08,05, 49,C9, 48,99, 94, dC, 4EB 
5149 DATA CB, C9,49,00,46,09,80,91,96,0B, 93,93, 76,C3,05, 3F6 
5158 DATA 6F,0F,0F, 4F,6F,C3,93, 42,93, 69,30, 30,96, 69, 3C, 4B2 
5168 DATA 69,C3,69,C3,69, C3, 76,69, 85,96, 3C, TC, FC, FC, 33, 7E{ 
5178 DATA 33,76,0F,05,4F, 76,CF,95,CB, C3,C7, CF, CB, C3, 36, 73E 
5188 DATA C3,42,42,C8, 9, 44, 39, CC, 48, C8, 83, 42, 84, CB, OC, 5A4 
5198 DATA 76,99,08,C4, 74, 48,98, 49,93, 42,81, 82, 03,96, 8B, 3AA 
5298 DATA 93,43,76,C3,84,CF,6F,CF,CF,CB, CF,C3, C3, 93,93, 745 
5218 DATA 76,30, 13, 7C, FC, B9, 33, 33,27, 76,8F,84,4F, 76,CF, 5Aÿ 
5228 DATA 95,CB,C7,8F, AD, C3,C3,27,C3,03, 42,C2, 18, A4, 94, 7BA 
5238 DATA 84,C9,C8,64,93, 42,80, 76,98,87, 49,98, 8C, 89, 89, 5B2 
5249 DATA 76, 30,8, 76,3, 5D, 7C, FC, FC, 33, 33, FC, 93, 42, 33, 68F 
5258 DATA 67,98, 33, FC, BC, 76,3, 94,89, 3C, #3, 42, 76, BC, 87, 5E6 
5268 DATA 9C, 3C,8C, 80, 9C, 3C, 3C, 2C, BC, BC, 3C, BC, 6C, 76, 3C, G4E 
5279 DATA 84,80, 8, 3C, 20, 76,80, 96,90, 76, 3C, 27, 7C, FC, 33, SAC 
5288 DATA 93,42,FC,43, 42, 27,33, FC, BC, 3C, TC, 33, 3C, 93, 42, 594 
5298 DATA 76,C3,98, 30, 3C, 69, 76,C3, 94,96, 30, 83, 42, 76, C3, 5AF 
5398 DATA 96, 76,3C,45,C3,93, 42,96, 76, 3C, 18, TC, FC, 91, B9, 5E7 
5319 DATA 76,33,06, 1, 33,93, 42,B9, FC, BC, FC, B9, 76, 33, 94,615 
5329 DATA 1B,FC, 27, 18,76, 76,1,FC, 33,0F, 76, 3C, 33, TC, FC, 5E1 
5338 DATA 93,42, 76, 33,95, 27,0E, 4C, C4, 76,9F, BB, 1B, 27, 1B, 325 
5349 DATA 76,33,66, 1B,1B, 27,9F, 33, 27,9F, 4F, 3C, 38,98, 3C, 31B 
5358 DATA 3C,98,38,98,98, 38,96, 93, 42,90, 76, 3C, #4, 38, 98,573 
5368 DATA 3C,93,42, 76,98, 84, 3C, 3C, 98,98, 3C, 3C, 98, 9C, 76, 55D 
5378 DATA 30,98, 7C,FC, 93,42, B8,8C, C4,58, 18, PC, 84,C0,FB,641 
5388 DATA 1C,38,2C,4C,C9,34,E4, C9, 45, C7, 76, CF, 97,5E, 39,613 
5308 DATA CF,93,42,C7,CF,9F, 18, 33,33, 1B,8F,8F, 8F,CF, 43, 4D4 
5498 DATA 42,CB, 76,30, 85, 76, 80,94, 2C, BC, 83, 42, OC, 20, BC, 51B 
5419 DATA 93,42,3C,8C, 03, 42,9C,8C, 9C, 3C, 3C, 20, 8C, 83, 42, 48B 
5429 DATA 90,76, 30,88, 2C,98, 39, 79,98, 78, 79, 3C, 3C, 69, C4, CE 
5438 DATA 84,48, 88, 76,98, 04,CB,CC, 24,58, 98, 88, 49, C1, C3, 592 
5448 DATA 93,42,C7,C7,CF,8F, CF, 4F,C3,87,4F,C3,CF, C7, CF, 919 
5458 DATA BF, 1B,27, 4F,6F,CF, 93, 42,C3,CF, 30, C3, C3,96, 76, 723 
5468 DATA 3C, 19, BC, 7C, 3C, 3, F4,8C, B4, 3, 3C, 78, 76, 3C, 95, 5E9 
5478 DATA 2C,94,69, C8, CB, 88, 68,93, 42,80, 8C, 48, 89, 99, 19,549 
5489 DATA 89,CC,58, 49,C4,88, CO, 88, BB, 41,C3, 03, 42,C7, CF, 7C7 
5498 DATA C7,4F,C3,C7,87,CB,C3, C3, C7,8F, 1B, 27, 4F,CF, C3, 8F 
5598 DATA 93,42,83,69,96, 3C, C3, 76, 3C, 8F, BC, 3, FC, 3C, 7C, 5B3 
5519 DATA 9F,33,27, 1B,CC,6C, FA, 93, 42, CC, 38, 39,98, B9, 8C, 5F1 
5528 DATA Ed, 79,B8,F8, Ed, 79,64, 39,B4,64, BC, AC, GC, CB, 48, 79C 
5538 DATA E8,69,48,0C,CB, 18,30, 3C, 78,98, E4, 48, 80, 09, 49,608 
5548 DATA 89,93,93, 43, C7, CB, CB, C3, CF, 76, 76,1, CB, C3, C3, 7F6 
5558 DATA CF,83,42,8F, 4F,CF,CB, C3, 83,93, 39, 33, 39, 39, 3C, 56F 
5569 DATA 39,30, 36, 39, 33, 39, 36, 3C, 83, 42, 36, 36, 3C, 39, 3C, 324 
5578 DATA 39,33, 39, 3C, 76, 76,81, 3C, 7C, 39, 27, 4E, 8C, BC, C, 418 
5588 DATA 8C,CC, 38,F8,E4,64, 34, 78,98, B4, 30, 8C, 38, 8C, 58, 694 
559$ DATA 64,8C,4C,8C, 48, C8, 98,98, 49, 88, 8, 08, 84, 98, Eë, 598 
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5618 DATA C3,8F,CB,C3,CB,CF,CF,9F,CF,CB,C3,96, 4B, 93,69, 992 
5629 DATA C3,30,3C,69,C3,69, C3, 3C, 3C, 69, 93, 42,C3,69,C3, 6AB 
5638 DATA 69,C3,69,C3,69,C3,FC, 33,93, 42,27,8F,4F,4F,8F,5DB 
5649 DATA 4F,9E,3C,F8,78,8C,CC, CC, 18,39, 39,64, 48, 48,84, GAS 
5659 DATA 48,C9,C9,08,48,684,0C,18,64,2C,BB,98, 84, 39, 4C, 4E8 
5669 DATA 24,48,C9,76,89,05, C8, 79, 46,49, 19,98,01,93,93,37E 
5678 DATA 43,03,07,CF,C3,C3,CF, 76,03, 96,83, 76,3, 16, 70, 7F7 
5688 DATA 33,93, 42, 1B,76,9F, 84, 4F,CF,8F,CE,24,98,39,64, 4E7 
5698 DATA 39,48,84,48,C8,C8,84,48,84,48,C9,76,88,95, 49,5D7 
5788 DATA 9C,48,40,0C,98,89, 76,09, 94, 4C,C8,88, 76,98,05, 3B1 
5718 DATA 91,93,93,42,43,C3,93,42,6F,8F,CF, 76,C3, 05,96, 4D5 
5729 DATA 8B, 76,30, 13,FC,BC, 33,93, 42,27, 76,8F,04,4F, 76, 4F5 
5738 DATA CF,94,CB,CF,CB,87,3C,CB,C7,CB,83,C3,C3,99, B4, AS 
5749 DATA E9,98,18,48,89,C9, 84,84, 46,94, 9C, 48, 09,89,B8,5C8 
5758 DATA 49,C4,49,C8,08,81,98,03,01, 93,93, 42, 43,63, 93, 31A 
5769 DATA C3,C3,C7,CB,CB,CF,8F,CF,C7,C7, 76,C3, 04,93, 76,954 
5778 DATA 3C,11,FC,93,42,33,33,FC,3C, B9,CF,9F, 76, 76,91,5B9 
5789 DATA BC,27,CF,93,42,CB,CB,CF,CB,C3,C3,87,4F,C3, C6, 98C 
5798 DATA 3C,3C,6C,58,68,84,24,CC, 90, 4C, 92,93, 99, 76, 83, 3E6 
5888 DATA 9D,9E,E9,43,76,C3,95,C7,CF,CF, 76,9F,95,4F,CB,71E 
5819 DATA C3,C3,93,93,42, 76, 3C, BE, FD, 2A,00,51, 77, 39,27, 4DD 
5829 DATA 8F,CF,76,76,81,39,76,CF,88,C3,CF,C7,C6,C3,C6, 7F9 
5838 DATA 3C,93,42,CC,E4,58,38,C8, 4C, C8, 99,93, 42, 88, 1, 4E3 
5649 DATA 99,76,93,9A,C3,87, 76, 76,81, AD,C3,C3, 76,CF,04,636 
5858 DATA 6F,0F,9F,1B,9F, 18, 76,33,94,8F,9F,CF,CB,C3, 83, 49) 
5864 DATA 93,76,3C,9B, 22,99, 3F, A2, 89,09, A2,54,2D,9F,0F, 394 
5878 DATA 6F,CF,CF,9A,9E,3C,3C,CF,B4,3C, 3C,6C, 98, C, C9, 7AB 
5888 DATA 18,E8,49,84,48,9C, 18,30, 3C,F9,F4,B9,64,8C, 48,668 
5898 DATA C9,93, 42,0, 93, 42,98, 92,93,83,43,C3,C3,C7,C3, 4F9 
5989 DATA CF,68F,76,8F,06,1B, 33,93, 42,76, 76,91,FC,43, 42, 4AA 
5918 DATA 76,76,91,33,33,27,4F,CB,C3,C3,93,76,3C, 86, 7C,551 
5928 DATA AA,98,F3,51,89,F3,F3, A2, 00,03, 42,3E, 77,0F,9F,58E 
5938 DATA CF,4F,CF,CF,4D,3C,65,48,8C, DB, 3C,B8, 3C, 78,29, 716 
5949 DATA 44,98, 34,3, 78,3C, 78,F8,8C,58,6C, 3C, B4,F,E8,6FB 
5958 DATA 98,39,64,CC,4C,CC,98,74,B8,8C,8C, 4D,CF,8F,8F, 79A 
5968 DATA 1B,1B,76,33,94,FC, 83, 42,33, 76,FC,07, 33,33, 4F, 485 
5978 DATA 4F,CB,C3,C3,93, 76,3C,95, 7C, AB, 99,98, A2, 99, 89,529 
5989 DATA B7,7B,A2,99,83,42,3E, 22,EF,8F, 76,CF, 96, DE, 3C, 65C 
5998 DATA 3C,B4,3C, 3C, 78,30, 3C, 38, 3C, 3C, B4, 36, 78,B9,F9,694 
6998 DATA F9, A4,98,79,F9,38,F0,B9,6C,9C, 48,C9,C4,84,76,8AE 
6818 DATA 9C,04,48,98,95, 76,33,04,76,76,91,FC,FC, B9,BC, 564 
6929 DATA 76,3C,97,FC,FC,33,27,8F,CF,C3, ED, 83, 93, 1B, 76,689 
6938 DATA CF,95,76,9F,94, 76,33,07,0F,0F,CF,CB,C3,C3,93,54E 
6948 DATA 76,30, 8C, 76,89,96, 14,76, 76,91,0F,93, 42,CF,4F, AD 
6458 DATA 76,CF,94,1B,4F,CF,9C, 4D,CF,8E, 34, 76,3C, 84,64, 586 
6968 DATA 8C,89,88,C9, 93, 42,89,C9, 63,42, 09,93, 42,CC,88,5A7 
6878 DATA 99,93,03,42,CB,93,93,76,C3,04,8F,76,CF,84,4F,3FD 
6989 DATA 8F,93,42,1B,76,33,97,8F,27,CF,CF,C3,C3,43, 76,572 
6898 DATA 3C,0B, 7D, 76,08, 66, 14, 76, 76,91,9F,03,42,76,CF, 3DA 
6199 DATA 97,98,F8,93,42,0C, 18, 3C, 78,3, 3C, A4, 8C,C9,C8,554 
6118 DATA 9C,0C,98,76,98,96,C8,98,08,89,00,81,93, 03, 39,21C 
6129 DATA 93,43,76,C3,84,6F,4F,CF,8F,76,0F,05, 1B, 76, 33, 58D 
6139 DATA 97,27,27,CF,CF,C3,93,93, 76,3C, 98, 76,3C, 13, 7C, 4AF 
6148 DATA 76,30, 4B, 7C,FC, 33,76, 76,81,FC, 93,42, 33, 4F,9B,5F3 
6158 DATA 76,76,91,FC, 76,3C,94,B9,3C, 93,42, 76, 4C, BB, 3C, 4DF 
6169 DATA 4C,93,42,3C,3C,4C, 83, 42, 3C, 4C, 4C, 76,3C,94, 4C, 379 
6178 DATA 4C,3C, 76,4C,98, 76,3C,28,FC, 33,83, 42,76, 76, 81, 48D 
6189 DATA FC,B9,27,1B,76,76,81,FC, 3C,FC, 33,30, 93,42, 76,642 
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6248 DATA 83,42,76,3C, 16, 7C, FC, B9, 26, DC, 33,93, 42, 27, 1B, 4FA 
6218 DATA 27,27, 18, 76,33,84,FC, BC, FC, B9, 76, 33, #4, 1B, 76, 5C1 
6229 DATA 76,91,27, 18,76, 76,81,FC, 33,8F, 76, 4C, 31, FC, #3, 4CG 
6239 DATA 42,89, 76, 33,97,9F, 4,38, C9,8D, 76,8F,06,6F,CF, 56A 
6248 DATA 4F,6F, 18, 27,8F, 18, 76,33,95,0F,0F, 27, 0F, 33,27, 246 
6258 DATA 9F,CF, 30, 39,31, 30, 30, 31,30, 3C, 31, 39, 31, 76, 3C, 3F2 
6269 DATA 97,39,31,3C,93, 42, 76,31, 04, 39, 34, 39, 31, 34, 3C, 2E4 
6278 DATA 31,34, 76,3C,98, FC, 93, 42, 31, 24, BB, 3C, BC, 3C, 30, 4DD 
6289 DATA EB,D9,98, 79,38, E4, 39, 8C, 34,B9, CB, 41, C7, 76, CF, 881 
6298 DATA 97,1B,33,CB,C7, CF, C7,CF,8F,9F, 33,33, 1B,8F,CF,649 
6309 DATA 9F,8F,9B,CF,CB, 76, 3C, 98, 4C, 3C, 03, 42,6, 10, 76,558 
6318 DATA 30,99, 4C, 10, 76,3C,9F,EC, 3C, 78, 78, 3C, F6, 39, CC, 5AE 
6329 DATA 58,C8,48, 4C, 48, C9, CO, 99,83, 42,19, E4, CC, 18,C8,659 
6334 DATA 99,89,41,C3,93,42,CF,CF,CB,CF,CF, 4F,C3, 93, 67, 75C 
6348 DATA C3,C3,C7,C7,8F,9F,33,0F, 6F,4F, CB, CB, C3, CB, 69, 85F 
6358 DATA 96,3C,C3, 76,30, 13, FC, 93, 42, 30, 3C, FC, 76, 76,81, 5FC 
6369 DATA FC,FC,FB, CC, 79,30, 83, 42, B4, 76, 3C, 05, E4, 1C, 68, 778 
6378 DATA C9,C9,86,09,99,48,08,C8, CB, 0,89, 44, 80, 4C, 58, 538 
6384 DATA 49,8C,89,89,C9,88, 41,02, C3,93, 42,CF, CF, 4F, C3, 6C7 
6398 DATA C3,C7,CB,C3,C3, C7, 8F,8F, 27, 4F,CF,C3, 83, 42, 83, 798 
6498 DATA 3C,C3,C3,96, 76, 3C, BF, BC, 3C, FC, BC, TC, 33,33, 9F, 6BA 
6418 DATA 98,3C,6C,FB,8C, BB, 34, 3C,B8, 4, 78,E4, 38, 84,98, 818 
6429 DATA CC, 18,34, E8, CO,C9, 8C, 48, 84, 4C, 4C, 98, 29, 08, 84, 5E4 
6438 DATA 98,F9,F8,B9,F8,B4,CC,E4, CB, 68,40, 49, 80,93, 83, 804 
6449 DATA 43,76,C3, 84,07, 76, 76,01, CB,C3, 03, 42, CF, 6F, 1B, 689 
6458 DATA 4F,CF,C3,C3,83,93, 76, 2, 44, 3C, 20, 3C, LE, 76, 2D, 537 
6469 DATA 94,30, 3C, 20, 2D, 3, 3C, 2D, 93, 42, 3C, 2D, 2D, 33, BC, 345 
6478 DATA 3C,B9,4F,0F,8C, 8C, CC, 98, CC, FA, F8, 8C, BG, B4, 24, 7CF 
6488 DATA 58,30, 3C, 79, B4, 3C, 79,64, 8C,B4, A4, C4, 8C, 08,08, 5C8 
6498 DATA 99,49, 0C, 89,98, 48, 48,C8,83,42,76,48,84,C0,C4, 457 
6598 DATA 49,01,93,43,42,C3,C3,87, 4B,C3, C3, CF,CF, 4F, CB, GDF 
6518 DATA C7,C3,C3, 4B, 93, 2D, 30,93, 42, 20, 3C, 3, LE, 3C, 3C, 484 
6528 DATA 2D,8F,76, 20,84, 3C, 1E, 3C, 1E, 2D, 20, B9, 33,33, 0F, 31F 
6538 DATA 27,0F,0F,4F,9F,0F, 10,30, 20, 79, 78,B0, CC, 8C, CC, 4EA 
6548 DATA 8C,4C,CC, 8C, BC, 4C, 48, 76, C9,95, 49,98, BC, B#, BC, 62B 
6558 DATA 99,49,98,C8,C8, 89, 76,98,04, 49, C4,64, 8C, 84, 44,58E 
6568 DATA 49,89,83,83,43,C3,C7,CF,C3,CB, CB, C3, C3, CB, C3, 88F 
6578 DATA 93,42,83,69,C3, 3C, 3,69, C3,69, C3, 69, C3, 69, C3, 71C 
6588 DATA 69,C3,69,C3,69,96, 3C, 83, 42, TC, FC, B9, 33, 1B, 27,67E 
6598 DATA 9F,93,42,8F,CF, 93,42, 8F,6D, BC, 9A, 38, 39, CC, 48, 50D 
6689 DATA 48,84,76,C4, 84, 0C, 8C, 89, 49, 76, 09,04, 49,84, 48, 464 
6618 DATA C9,84,48,00,93, 42,48, 4C,64,08, 49, CB, 49, BG, 80, 489 
6629 DATA 81,93,93, 42, 43,C3, 83,42, CF,0F, CF, CB, 76,C3, 04,549 
6638 DATA 96,8B, 76,3C, 13, B9, 39, 76, 33,94, 76,8F, 85, 4F,CF,52D 
6649 DATA 93,42,CB,C7,C3, 16, 3C,C3,93,E9, 83, C3, C2, DB, 3C, 847 
6654 DATA E9, 44, CC, CC, 98, 48,88, CB,88,C8, 83, 42, 49, CO, 84, 745 
6669 DATA 4C,4C,99,90,1,93,82,01,83,03, 42,43, C3,83, 03, 233 
6678 DATA C3,93,42,CF,93, 42,0F,CB,C7, C3, 83, 42, 43,C3,83,5CE 
6689 DATA 76,30, 11,FC, BC, FC, 33, 36, 3C, 3C, ED, CF, 8F, 76, 76, 78F 
6698 DATA 81,3C,67,0F,CF,CF,C3,C3, 1B,C3,83, 42, LE, 27, C3, 602 
6789 DATA 96,30, 30,24, DC, 98, C4, 88, 76,09, 04, 76, 03,99, C3, 521 
6718 DATA 76,03,95,1E,CB, 43, 76,C3,94, C7, CF, 93, 42, 8F, 93, 4D4 
6728 DATA 42,1B,9F,4F,CB,C3, C3, 93, 83, 42, 76, 3C, 0C, TC, BF, 54D 
6738 DATA 7F,42,99,08,9B, BB, 0F,0F,4F, LE, 2D,CF,8F, CF, 6F,58B 
6749 DATA 8F,76,CF,94,CB,CB, C3,98, B4, 3C, 3C, 78, 3C, 8C, 94, 7C9 
6758 DATA B9,C8,4C,48,C8,98,98, 48,92, 82, 88,00, 80,09, 90,318 


ASE 





JAQUETTE 









Pierre VACHER 


Valable pour CPC 6128 





Destiné aux personnes qui aiment avoir des disquettes bien 
répertoriées, JAQUETTE s’occupera automatiquement 
(moyennant un minimum de manipulation) de vous 
imprimer des... jaquettes comportant le catalogue 
de celles-ci. 


Le programme a été écrit pour DMP 2000/2160 et doit 
normalement fonctionner avec toute imprimante 
compatible EPSON. 


19! --*JAQUETTE x-- )LA 
29 ? ==-=-=2-2-2-2-- 2-2 2-7 >LB 
38 " Pierre VACHER -- (c) 1998 )LC 
4g )LD 
5g )LE 
68 SYMBOL AFTER 32 )MT 
74 DIM nom$(64,2),rst$(2) )TB 
88 MODE 2:BORDER B:INK #,8:INK 1,26:CLS )FU 
99 tit$="--x JAQUETTE 3--":a=33:b={:GOSUB 579 NN 
188 LOCATE 33,3:PRINT STRING$ (16,61) )EE 
119 MINDOW#1,29,61,11,17:PAPER#1,9:WINDON 1,89, 4,25 JW 
128 f=1:GOSUB 459 LM 
139 f=2:GOSUB 459 LP 
149 GOSUB 749 HF 
158 LOCATE#1,11,3:PRINT#,"Preparez l'IMPRINANTE" DAX 
169 LOCATE#1,8,5:PRINT#!, "puis appuyez sur une touche." >HU 
179 CLEAR INPUT:CALL &BB18 DVY 
189 IF INP(&F599)=94 THEN GOSUB 748:LOCATE#1, 13,3:PRINT DQN 
Hi, CHR$(7);"I MP RI MAN T E":LOCATE#1,12,5:PRINTH1, 
"NON  OPERATIONNELLE !":FOR i=1 TO 2989:NEXT:GOTO 149 

198 GOSUB 748:LOCATE#1,14,3:PRINT#1,"Un instant S.V.P." }ZT 
:LOCATE#1,13,5:PRINT#1, "IMPRESSION en COURS" 

289 )RC 
219 * --x IMPRESSION +-- )RD 
229 RE 
238 PRINT#8, CHR$(15); :PRINT#B,CHR$(27);"3":CHR$(24):STR )QD 
ING$(59, 45) 

249 PRINTHE,"! "3; STRINGS(19,32);CHR$(27) :"G": : PRINT )TQ 
8,CHR$(27); "4" 3;"FACE 1"; CHR$(27) ; "HM; STRING (19, 32) ;CHR 
(27) "5"; STRINGS (18, 32) ; CHRS (27); "G"; :PRINT#8,CHRS 
(27); "4"; "FACE 2°; 

259 PRINTHB,CHR$ (27); "H"3;STRINGS (18,32) ;CHRS(27);"5"; mt DAC 
269 PRINTHB,"!  !";STRINGS(26,45);"1";STRINGS(26,45);" )AQ 
in 

278 FOR i=1 TO 32 )CF 
288 IF non$(i,1)C(>""AND non$(i,2)C""THEN PRINT#8,"! )JD 
1 Minon$(i,1);" ! "inon$(i,2);" !":GOTO 329 

299 IF non$(i,1)(>""AND non$(i,2)=""THEN PRINT#8,"! ! NP 


"inon$(i,1);"  !";STRINGS(26," ");"1":G0TO 328 


+ 





à 
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Pas besoin de mode d'emploi, il suffit de lancer le 
logiciel et de s'en tenir à ce que l'on vous demande... 
Simple, efficace et. reposant ! 


399 IF non$(i,1)=""AND nom$(i,2)<""THEN PRINT#8,"!  ! )NH 
"sSTRINGS(26," ");"! "snom$(i,2):" !":G0TO 328 

319 PRINT#8,"! 1"; STRINGS(26,32);"!";STRING$(26,32);" 
[AU 

329 NEXT 

339 PRINT#8,"! 1": STRING$S (9,32); CHR$(27); "4"; :PRINT#B 
,CHR$(27);"Gtirst$(1)5;" Ko LIBRE(S)";CHR$(27); "55; :PRIN 
T#8,CHR$S (27) ;"H;m  IMSSTRINGS (19, 32); 

349 PRINTHB,CHR$(27);"4" 5: PRINT#B,CHR$(27);"Grirst$(2); 
" Ko LIBRE(S)";CHR$ (27); "5"; :PRINTHS, CHRS(27); "HN; 18 

359 PRINTHB, STRINGS (59,45) 

369 GOSUB 749 

378 LOCATE#1,12,3:PRINT#H, "Desirez-vous traiter":LOCATE 
#1,12,4:PRINT#1{, "une autre disquette?":LOCATE#1,15,5:PR 
INTH1, "(Oui ou (N)on" 


)AC 
)EA 
KN 
>G4 
JVK 


>HK 
)2J 


388 a$=UPPER$(INKEY#):1F a$=""THEN 384 )FT 
398 IF a$="O"THEN RUN )PN 
499 IF a$="N'THEN GOSUB 748:LOCATE#1,15,4:PRINT#1, "A U )DB 
REVOÏIR":FOR i=1 TO 1589:NEXT:CALL 8 

419 PRINT CHR$(7);:GO0T0 388 JW 
428 ! RG 
439 ? --# INTRO. DISQUETTE +-- RH 
448 RJ 
458 GOSUB 748 >HK 


468 LOCATE#1,5,3:PRINT#1,"Introduisez votre disquette F )XK 


ACE";f 


479 LOCATE#1,8,5:PRINT#1, "puis appuyez sur une touche." >MY 
469 CLEAR INPUT:CALL &BB18:CLS )ZA 
499 GOSUB 818 )JB 


598 IF sd=1 THEN GOSUB 749:LOCATE#1,19,3:PRINT#{,CHR$(7 NN 
"IL N'Y A PAS DE DISQUETTE":LOCATE# 1, 14,5:PRINTH1, "DA 


NS LE LECTEUR !":sd=9:FOR i=1 TO 2989:NEXT:GOTO 459 


519 tit$="Un instant S.V.P.":a=33:b=21:GOSUB 579 JWX 
528 GOSUB 639 HF 
538 RETURN )2D 
548 ? >RK 
558 ? --* DOUBLE HAUTEUR #-- )TA 
569 )TB 


578 FOR i=1 TO LEN(tit$):c=HIMEM+1+8#(ASC(MID$(tits, i,1 
))-32):SYNBOL 253,8,PEEK(c),PEEK(c),PEEK(c+1),PEEK(c+1) 


)JQ 


1 | FACE 1 ; FACE 2 : 
: 18 . SCE = 2Ko ! DEMU . BAS = 2Ko! 
1! COULEUR . SCE = 1 Ko ROUTINE! . BAS = 2 Ko ! 
1! INFO . BAS = 2Ko ROUTINEZ . BAS =. 3 Ko 
1! NDC . = {Ko ROUTINES . BAS = 2 Ko 
[INR . SPR = 3 Ko ROUTINE4 . BAS = 1 Ko 
1! NDCSCRI . SCR = 9 Ko ROUTINES . BAS = 1 Ko 

! ! PROTEC . BAS = { Ko ROUTINES . BAS = 3 Ko 
1! PROTEC . SCE = 1 Ko ROUTINE? . BAS = 2 Ko 

! ! SCROL . SCE = 3 Ko XYPHOES . BAS = 1 Ko 
ii VAGUE , SCE = 3 K 

; 


, PEEK(c+2),PEEK(c+2),PEEK(c+3) :SYMBOL 252, PEEK(c+3),PEE 
K(c+4),PEEK(c+4),PEEK(c+5),PEEK(ct5),PEEK(c+6), PEEK(c+6 

1,9 

589 LOCATE a,b:PRINT CHR$(253) :LOCATE a,b+1:PRINT CHR$( )EH 
252) 


598 a=at1:NEXT:RETURN )RQ 
608 RG 
619 ? --x LECTURE CATALOGUE #-- >RH 
629 )RJ 
639 x=9:na=f:y=4:rf=4 )QZ 
648 LOCATE 1,1:CAT )HX 

)UJ 


659 LOCATE x,y:1F COPYCHR$(##)=". "THEN na=nm+1:FOR i=1 





ARCADES 


Des centaines de logiciels pour CPC à télécharger 


avec le kit ARCADES. 


TO 16:LOCATE(x-9)+i,y:nom$(na,f)=nom$ (ne, f)+COPYCHRS (#9 
}INEXT:LOCATE x-8,y:PRINT CHR$(24)non$(nn,f)"K"CHR$(24) 
ELSE 698 

669 nom$(na,f)=LEFT$(non$(nn,f),8)+" . "+MID$(non$(ns,f >HL 
),19,3)4" = "+RIGHT$(nom$(nn,f),2)+" Ko" 

679 y=y+1:1F rf<y THEN rf=y )WR 
688 LOCATE x,y:1F COPYCHRS (#8) ©"."THEN y=4:x=x+28:G0T0 QD 
658 ELSE 658 

699 FOR i=1 TO 3:LOCATE i,rf+i:rst$(f)=rst$(f)+COPYCHRS DNL 
(#8) :NEXT 


789 RETURN )ZC 
718" )RJ 
729 ? --# DESSIN FENETRE +-- >RK 
736 ’ )TA 
749 CLSH1:LOCATE#1,1,1:PEN#1,L:PRINT#1,STRING$(42,216) )AA 
759 LOCATE#, 1, 7:PRINTH1, STRINGS (42,218); )KQ 
768 FOR i=1 TO 7:LOCATE#, 1, i:PRINTH{, CHR$ (287) :LOCATE# DUD 
1,42, i:PRINT#1, CHR$ (287) ; :NEXT 

717$ RETURN )ZK 
788 ' )TF 
799 ? --x TEST LECTEUR DISC #-- )TG 
888 ’ RJ 
819 OUT &FA7E, 1 DXK 
829 FOR i=1 TO 1989:NEXT RT 
838 OUT &FB7F,4 )YG 
849 OUT &FB7F,2-PEEK(4A798) )VP 
858 d=INP(&FB7F) )LG 
868 OUT &FA7E, 8 >YD 
878 1F(d AND 32)=$ THEN sd=1 ELSE sd:=ÿ )DC 
888 RETURN )ABe 





Voir bon de commande page 38 ( 





PETITES ANNONC 


V 


La place réservée aux petites annonces est limi- 
tée. En conséquence, celles-ci passent dans leur 
ordre d'arrivée. Par contre, les petites annonces 
fartelues sont systématiquement rejetées... De même, 
comme il est peu probable qu'il existe des “géné- 
reux donateurs” de matériels ou de logiciels, les 
petites annonces faisant appel à ces philantropes 
ne seront insérées que si la place le permet. 
Seront refusées toutes les annonces visant à ven- 
dre ou échanger des listes ou copies de logiciels 
non garantis “d'origine”, ainsi que toute annonce 
incitant au piratage. 
En conséquence, réfléchissez bien avant d'envoyer 
vos textes. Les petites annonces doivent impérati- 
vement nous parvenir sur la grille (découpée ou pho- 
tocopiée), le texte étant rédigé à raison d'un carac- 
tère par case. 
Enfin, toute annonce non accompagnée de timbres 
ne sera pas insérée. 


À 


+ Je cherche listings Amslettres. Ludovic Dela- 
bre, Le Pré Latour, 532 Les Alérions, 54700 
Pont-à-Mousson. 





+ 6128 mono + 5” 1/4 1 Mo + DMP 2000 + joys. 
+ DBase + Multiplan + TTexte + T. Pascal + 
nbx livres & prog. : 7000 F à déb. Tél. (1) 
69.07.20.94. 


+ Vds lecteur 3” 1/2 pour CPC 6128 : 990 F et 5” 
1/4 : 1350 F, double face. Tél. 88.84.92.17, 
soir. 


+ Echange jeux utils démo éducatif sur 6128. 
envoyer listes, Dettori Patrick, 11, rue du Casi- 
no, 83230 Bormes. 


+ Vds 6128 mono + lecteur disquettes externe + 
40 disquettes + joystick + doc. Prix : 2000 F, 
bon état. Tél. (16.1) 30.50.18.10. 


+ Vds D7 maths trigo pp CM PGDC : 120 F. 
Cherche contacts 78. De Brito, 45, rue de la 
Frette, 78500 Sartrouville. 


+ Vds pour Amstrad 464 ou 6128 crayon opti- 
que neuf avec notice et prog. : 150 F. Télépho- 
ner au 83.81.23.08. 


+ 75017 Vds 6128 coul., impr. Epson LX80 + 
ext. 256 K + jeux + 30 D7 + Multiplan + Texto- 
mat : 2500 F. LX 80 : 1200 F. Malbec, 
42.29.68.34. 


+ Recherche pour CPC Turbo Pascal, Généra- 
teur Dbase Il, souris, prix mod. ou éch. Menu, 
118, rue 1er Septembre, 60200 Margny Les 
Compiegne. 


+ Vds CPC 6128 + CPC 464 + mon. couleur + 
mon. mono + jeux K7 et discs + 1 manette + 
nbreuses revues. Le tout : 3300 F. Jen-Luc, tél. 
39.90.89.51. 


+ Cherche contacts. Genessi Christelle, 42, im- 
passe de la Marline, Puy St André, 05100 
Briançon. Possède de nombreuses news. 


+ Vds CPC 6128 couleur (lect. neuf) + 160 jeux. 
Valeur : 7500 F, vendu : 3000 F. Tél. 
20.91.64.06, après 18 h, Nicolas. 


+ Cherche contact sérieux pour 6128, possède 
de nomb. jeux. Envoyez liste à Wiart William, 
18, Pr. Newton, 20900 Nimes. 


+ Cherche moniteur couleur CPC 464 ou 664. 
Région parisienne, M. Denize, tél. (1) 
64.93.34.74,. 


+ Vds CPC 6128 coul. + tuner TV + radio + 
antenne + meuble + 50 jeux + revues : 3500 F. 
Tél. 45.89.35.16. 


+ Vds clavier CPC 464 : 700 F, tbe (à débattre). 
Tél. 77.72.20.85 à 20 h. 


Ne te Ale ER 


- Vds CPC 6128 couleur + utilitaires : DBase, 
etc., livres, revues : 3500 F. 5 class. Weka: 
1500 F, valeur : 3700 F. Tél. 97.32.90.93. 


- Je suis auteur programme gestion de timbres 
pour CPC 6128. Ingles Jean, 232, rue des Sau- 
les, 74950 Scionzier, 50.98.86.92. 


+ Vds CPC 6128 couleur + Tuner TV + réveil + 
bureau + 3 joys. + 80 jeux + revue : 3180 F. Tél. 
86.97.02.65, le week-end. 


+ Urgent ! Vds CPC 464 coul. + joystick + 110 
jeux dont Chase HQ. Prix : 1600 F. Tél. 
43.66.69.56. 


+ Vds CPC 6128 coul. + joystick + 100 jeux 
(Double Dragon, Skate Ball, etc.) + Discology 
5.1 : 2000 F. Tél. 40.60.06.08. 


+ Vds K7 Turbo Out Run : 80 F + Chase HQ : 
85 F + Magic Sound : 320 F ou éch. tout contre 
extension 64 K Dr-Tronic. Tél. 55.80.2188, le 
soir. 


+ Cherche Rastan sur D7 ou K7 pour Amstrad. 
Tél. 33.93.88.44, après 2à h, demander Sté- 
phane. 


+ Urgent ! Vds CPC 464 couleur, bon état + 
Tuner TV + 47 jeux + joys. + cr. optique : 2000 F. 
Tél. 32.56.85.81, après 19 h, dem. David. 





LES PETITES ANNONCES ET LES MESSAGES 
Attention, vos PA seront mises sur le serveur avant la parution du joumal 








_ 





| 








SERRES 





Mettre ce coupon + 4 timbres à 2,30 F dans une enveloppe. 
Adresser le tout à : SORACOM - La Hale de Pan - 35170 BRUZ 


CPC 


Gagnez du temps ! Sur Minitel 36.15, tapez MHZ 
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BON DE COMMANDE Aa aie de Pan 33170 BRUZ 


Pour chaque article, entourez le ou les n° choisis. 

ANCIENS Nos AMSTAR & CPC 

N°26-27-28-29-3%-31-32-33-34 25 F (unité) 
35-—-36-38-39-40-—41-42-43- 4445-46-47 26 F (unité) 


DISQUETTES AMSTAR & CPC 
N°20-—21-22-— 23-24-2526 — 27 28-29 — 30 Abonné 110 F {unité) 
(une disquette réunit 2 numéros consécutifs d'Amstar & CPC) Non abonné 140 F [unité] 


ANCIEN No CPC Infos 
N°24-—25—26- 27-28 26 F {unité} 


Franco 
Franco 


Franco 
Franco 


Franco 
Franco 
Franco 
Franco 


DISQUETTES CPC Infos Abonné : 

— MEGA SOUND 110 F {unité} 
— N° 31 (AnvStar 48 & CPC Infos 24) — N° 32 (CPC Infos 25 & 26) Non abonné : 
— N° 33 (CPC Infos 27 & 28) 140 F {unité) 


ANCIENS Nos CPC 2 
N° 11-13-1618 23-24-25 — 26 25 F (unité) 
27-28-29-30— 31-32-33 34-36-37 


ANCIENS Nos HORS-SERIE CPC 21 F lunié 
N°4—7-8-9-10- 12-13-14-15-16 VF (unité) 
N°17—18—19-20— 21-22-23 23 F {unité} 


DISQUETTES CPC ET DISQUETTES HORS-SERIE CPC . 
N°1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17-18-19 Abonné : 
(une disquette réunit 2 numéros consécutifs de CPC) 110F {unité) 
HS1 — HS2 — H53 — HS4 — HS5 — HS$ — HS7 — HS8 — HS9 — HS1O — HS11 Non abonné : 
HS12.— HS13 — HS14— HS15 — HS16 —HS17 — HS18— HS19 — HS20 — HS21 -- HS22 - HS23 140 F [unité] 


ABONNEMENT 6 DISQUETTES (non rétroactif) 600 F 


DISQUETTES “ARCADES" Téléchargement AMSTRAD CPC 60F 
CABLE pour téléchargement 
{Téléchargement non compatible avec 6128+ et 464+) 


Franco 
Franco 


Franco 
Franco 


Franco 


Franco 
Franco 


5F 
5F 


LOGICIELS EDUCATIFS - LIVRES - DIVERS 


Forfait port + 10 F par logiciel et 10 % pour livres 


Q Facultatif : recommandé + 10 F par commande 
prendre contact avec le service commercial MONTANT GLOBAL 


Je joins mon règlement :  Q chèque bancaire  Q chèque postal D mandat CPC Infos 29 


PAYEZ PAR CARTE BANCAIRE Nom: 


fl SERA On O2 Oo EE Adresse : 
Date d'expiration Signature 


[inscrire les numéros de la carte, la date et signer] Code Postal : _________ Ville: 
ECRIRE EN MAJUSCULES 


Date et signature Signature Afin de faciliter le traitement des commandes, nous remercions notre aimable clien- 
tèle de ne pas agraler les chèques, et de ne rien inscrire au dos. 








Commande : La commande doit comporter tous les renseignements demandés sur le bon de commande (désignation ou rélérence si celle-ci existe). Toute absence de précisions est sous la responsabilité de l'acheteur. La vente est 
conclue dès acceptaion du bon de commande par notre socièté, sur les articles disponibles uniquement. 

Les prix : Les prix indiqués sont valables du jour de la parution du catalogue jusqu'au mois suivant ou au jour de parution du nouveau catalogue, sauf erreur dans le libellé de nos tarifs au moment de la fabrication du catalogue, et de 
variation de prix importante des fournisseurs. 

Livraison : La livraison intervient après le règlement Les délais de livraison étant de 10 à 15 jours environ, SORACOM ne pourra àtre tenue pour responsable des retards dus aux ransporteurs où aux grèves des services postaux. 
Transport : La marchandise voyage aux risques et périls du destinataire. La Evraison se faisant par cols postal ou par transporteur. Les prix indiqués sur le bon de commande sont valables sur toute la France métropolitaine, + 20 F par 
arücle pour Outre-Mer par avion et au-dessus de 5 kg nous nous réservons la possibilité d'ajuster le prix de ransport enfonction du coût réel de celui-ci. Pour bénéficier de recours possible nous invitons notre aimable clientèle à opter pour 
l'envoi en recommandé. A réception des paquets, toute détérioration doit être signalée Réciamation : Toute rédamaton doit intervenir dans les dix jours suivants la réception des marchandises. 


















# 
THE SPEAKER 


Xavier GROSSETETE 


Valable pour CPC 6128 


Voici un (long) programme qui va permettre à votre CPC de 
prendre la parole. Et comme ce dernier ne renie pas ses origi- 
nes anglaises, il possède un accent britannique très pronon- 
cé. En fait, il est assez allergi- 
que au français. 

Dans le programme sui- 
vant, il vous suffit 
d'entrer les phrases en 
clair (et en anglais de 
préférence) pour en- 
tendre la voix mélo- 








dieuse de l’Amstrad. 


CHARGEMENT 
Tapez et sauvez SPEAKER.BAS, faîtes de même avec 
DATSPEAK.BAS. I| ne reste qu'à faire RUN «DATSPEAK» 
pour obtenir le fichier «ROUTINEP.BIN». Pour lancer alors le 
programme, on fera RUN «SPEAKER» 











159 IF FRE("")<29899 THEN GOTO 219 >ZM 
SPEAKER 168 MEMORY &5FFF )LA 
178 LOAD'ROUTINEP.BIN", &8699 YA 
189 CALL &9BFE )Nk 
18 POKE 8B632,255:POKE LBDEE, 291 )ZR | 199 CALL &9987,7 )2F 
28 KEY 138,"AIDE"+CHR$(13) )TE | 288 GOSUB 34ÿ )GJ 
38 KEY 128, "HELLO"+CHR$ (13) >VX | 219 WINDON 3,38,2,24:PEN {:LOCATE 18,1:PRINT".THE SPEAK )TN 
4g KEY 129, "CPC"+CHR$ (13) >TM | ER SYSTEM"; 
58 KEY 139,"LIST"+CHRS$(13) UK | 229 PEN 2:LOCATE 9,2:PRINT CHR$(164)+"BIGHEAD SOFTWARE >CR 
69 KEY 131,"FIRE"+CHR$ (13) JUN | "3 :PEN 3:PRINT"1999" 
78 KEY 132,"THE SPEAKER SYSTEM"+CHR$ (13) >JU | 239 WINDOW 3,38,22,24:PAPER 1:PEN S:CLS:LOCATE 36,1:PRI HU 
88 KEY 133,"9123456789"+CHR$ (13) »ÿB | NT CHR$(246);:LOCATE 1,1:PRINT CHR$(245)" Entrer vo 
98 KEY 134, "AMSTRAD" +CHRS$ (13) >XK | tre phrase+ENTER. ":PRINT". Taper F. pour l'aide.":4 
199 KEY 135,"I AM THE NUMBER 1"+CHR$ (13) HG | INDOW 3,38,5,29:CLS 
419 KEY 136,"NEVER AGAIN"+CHR$(13) BJ | 249 WINDOW 1,49,1,25:LOCAIE 3,5:PRINT CHR$(245):LOCATE DAC 
128 KEY 137,"DISK"+CHR$ (13) DUB | 38,5:PRINT CHR$(246) 
138 PAPER 9:PEN 1 )LG | 259 LOCATE 3,24:PRINT CHR$(246):LOCATE 38,24:PRINT CHR$ DFT 
149 MODE 1:GOSUB 1568 PR | (245) 
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268 LOCATE 3,29:PRINT CHR$(246) :LOCATE 38,28:PRINT CHR$ DFK 849 SYMBOL 88, 236, 1982, 192, 192, 188, 96, 224, # JG 


(245) 859 SYMBOL 81, 188, 198, 198, 198, 214, 284, 196, 9  DLG 
279 INK 1,49:INK 2,3:INK 3,13 UP 868 SYMBOL 62, 236, 192, 192, 198, 198, 192, 238, 8 KZ 
288 BORDER 13 )JG 879 SYMBOL 63, 119, 194, 112, 68, 14, 134, 236, ÿ HT 
299 WINDOW 4,37,6,19 >ND 888 SYMBOL 84, 98, 99, 24, 24, 24, 24, 24, ÿ DD 
389 INPUT")",A$ )BJ 899 SYMBOL 85, 242, 98, 98, 98, 98, 98, 52, ÿ )EY 
319 IF A$="AIDE" THEN GOSUB 1639:G0T0 399 >GC 989 SYMBOL 86, 242, 98, 198, 52, 48, 24, 24, ÿ )FH 
328 CALL 4998B, A$ >HC 919 SYHBOL 87, 226, 196, 196, 196, 52, 52, 52, 8 )GV 
339 GOTD 399 YF 929 SYMBOL 88, 128, 228, 112, 56, 28, 78, 198, 8 DHF 
349 CALL &BB4E:SYMBOL AFTER 32 )YE 935 SYMBOL 89, 238, 198, 48, 24, 24, 24, 68, 8 DEF 
358 SYMBOL 245,9, 69, 38,297,231,243,129, 68 >GH 949 SYMBOL 99, 246, 286, 156, 56, 114, 238, 222, 8 JV 
368 SYMBOL 246,9, 69,129,243,231,297, 39, 69 )GT 959 SYHBOL 91, 69, 36, 36, 231, 129, 66, 36, 24 )GY 
379 SYHBOL 33, 24, 24, 24, 24, 24, 8, 24, 8 >CH 964 SYMBOL 92, 192, 96, 48, 24, 12, 6, 2, ÿ )CN 
389 SYMBOL 34, 54, 54, 36, 8, 8, 0, 9, £ )2T 975 SYMBOL 93, 69, 12, 12, 12, 12, 12, 68, 8 )DF 
399 SYHBOL 35, 9, 18, 63, 18, 18, 63, 18, 8 )CR 988 SYMBOL 94, 127, 127, 127, 127, 127, 127, 127, 127 DNQ 
499 SYMBOL 36, 12, 31, 44, 63, 13, 62, 12, ÿ >DC 998 SYMBOL 95, 9, 9, 9, 9, 9, 9, 9, 255 )YY 
419 SYMBOL 37, 34, 117, 42, 29, 42, 87, 34, 8 DEF 1998 SYMBOL 96, 48, 24, 12, 9, 9, 5, 4, 8 )AL 
428 SYMBOL 38, 56, 199, 56, 114, 154, 216, 188, 9 HU 1818 SYMBOL 97, 9, 9, 56, 68, 68, 124, 68, ÿ )DF 
430 SYMBOL 39, 24, 24, 48, 9, 8, 9, 9, # )2Q 1928 SYMBOL 98, 9, 9, 128, 68, 129, 68, 129, 8 )EX 
449 SYMBOL 49, 28, 48, 32, 32, 32, 48, 28, 9 )DY 1938 SYHBOL 99, #, 8, 69, 64, 64, 64, 69, ÿ )CA 
458 SYMHBOL 41, 56, 12, 4, 4, 4, 12, 56, 8 AU 1949 SYMHBOL 199, 9, 9, 128, 66, 68, 68, 129, ÿ )EN 
469 SYMBOL 42, 9, 9, 34, 29, 8, 29, 34, 8 AK 1959 SYMBOL 191, 8, 9, 124, 64, 124, 64, 124, 8 FA 
479 SYMBOL 43, 9, 24, 24, 126, 24, 24, 8, 8 )CN 1969 SYMBOL 192, 8, 9, 124, 64, 124, 64, 64, ÿ )EL 
489 SYMBOL 44, 9, 0, D, 8, 24, 24, 16, 32 > AU 1979 SYMBOL 193, 8, 8, 69, 64, 68, 68, 68, ÿ )DG 
499 SYMBOL 45, 9, 9, 9, 126, 126, 8, 9, 8 )AF 1989 SYMHBOL 194, 9, 9, 68, 68, 124, 68, 68, 8 )EN 
569 SYMBOL 46, 8, 8, 8, 9, 9, 24, 24, ÿ )YB 1898 SYMBOL 195, 8, 8, 56, 16, 16, 16, 56, 8 )DD 
519 SYMBOL 47, 1, 3, 6, 12, 24, 48, 96, ÿ AK 1199 SYMBOL 196, 9, 9, 4, 4, 4, 66, 56, 9 )AD 
529 SYMBOL 48, 129, 132, 132, 9, 132, 132, 128, 9 >HP 1119 SYMBOL 197, 8, 8, 68, 72, 112, 72, 68, 9 )DE 
539 SYHBOL 49, 16, 48, 16, #, 16, 16, 9, 9 )BJ 1129 SYMHBOL 198, 9, 9, 64, 64, 64, 64, 124, 8 >DF 
549 SYMBOL 59, 129, 4, 4, 129, 128, 128, 129, 9 )FP 1138 SYMBOL 199, 8, 9, 49, 84, B4, 84, 84, >DM 
558 SYMHBOL 51, 128, 4, 4, 128, 4, 4, 129, 8 )CC 1149 SYMBOL 119, 6, 9, 68, 199, 84, 76, 68, # )DE 
569 SYMBOL 52, 9, 132, 132, 128, 4, 4, 8, 9 )BE 1158 SYHBOL 111, 8, 8, 56, 68, 68, 68, 56, 8 DV 
579 SYHBOL 53, 128, 128, 128, 129, 4, 4, 126, 9 FH 1169 SYMBOL 112, #, 9, 129, 68, 129, 64, 64, ÿ )EJ 
589 SYMBOL 54, 129, 128, 128, 128, 132, 132, 129, 8  DKX 1178 SYHBOL 113, 8, 8, 56, 68, 66, 76, 68, 8 DT 
599 SYMBOL 55, 128, 4, 4, 9, 4, 4, 5, 8 )YG 1189 SYMBOL 114, 9, 9, 129, 68, 129, 72, 68, 8 DER 
698 SYMBOL 56, 129, 132, 132, 129, 132, 132, 128, 8  KF 1198 SYHBOL 115, 8, 8, 56, 64, 56, 4, 128, 8 )DC 
619 SYMBOL 57, 128, 132, 132, 128, 4, 4, 128, 9 )FW 1298 SYMBOL 116, 9, 9, 124, 16, 16, 16, 16, # )DL 
629 SYMBOL 58, 9, 9, 24, 24, ÿ, 24, 24, 8 )AN 1219 SYMBOL 117, 8, 8, 68, 68, 668, 68, 56, 8 >DB 
639 SYMBOL 59, 9, 9, 24, 24, 9, 24, 16, 48 )BV 1228 SYHBOL 118, 9, 9, 68, 68, 68, 49, 16, 9 )DN 
649 SYMBOL 68, 6, 12, 24, 48, 24, 12, 6, 8 )BJ 1238 SYHBOL 119, 9, 8, 68, 84, 84, 84, 49, 9 )DR 
659 SYMBOL 61, 9, 9, 126, 126, 8, 126, 9, 8 )CJ 1249 SYHBOL 129, 9, 9, 68, 49, 16, 48, 68, 8 )CF 
669 SYMBOL 62, 96, 48, 24, 12, 24, 48, 96, 8 DT 1258 SYHBOL 121, 8, 8, 68, 48, 16, 16, 16, 8 CD 
679 SYMBOL 63, 28, 59, 2, 2, 12, 24, 9, 24 )BJ 1265 SYMBOL 122, 9, 9, 124, 8, 16, 32, 124, 8 )DR 
689 SYMBOL 64, 24, 36, 66, 129, 231, 36, 36, 68 )GY 1278 SYHBOL 123, 8, 8, 9, 8, 4, 12, 18, 1 DAY 
699 SYHBOL 65, 48, 48, B8, 88, 124, 149, 158, 8 >GQ 1288 SYMBOL 124, ÿ, 9, 128, 89, 33, 34, 115, 252 )GU 
759 SYMBOL 66, 236, 192, 192, 198, 192, 192, 236, # KU | 1298 SYMBOL 125, 64, 128, 128, 224, 16, 9, 128, @ HG 
719 SYHBOL 67, 119, 198, 194, 192, 192, 194, 198, g )LD 1389 SYMBOL 126, 1, 3, 3, 7, 25, 1, 1, 2 >7F 
728 SYMBOL 68, 236, 192, 192, 192, 192, 192, 236, # KR | 1318 SYMBOL 127, 252, 254, 254, 254, 252, 252, 114, 1 MY 
730 SYHBOL 69, 238, 98, 199, 198, 199, 98, 236, 8 )JG 1328 SYMBOL 128, 8, 8, 192, 8, 9, 9, 8, 128 BE 
748 SYMBOL 79, 238, 98, 199, 198, 198, 96, 224, ÿ HA 1339 SYMHBOL 129, 2, 12, 28, 4, 8, 8, 9, 8 AC 
759 SYHBOL 71, 119, 198, 194, 192, 286, 198, 198, 9  )LC 1348 SYHBOL 138, 1, 2, 8, #, 9, 8, 8,9 D 0 
768 SYMBOL 72, 238, 198, 198, 124, 198, 198, 238, #  >KA 1358 SYMBOL 131, 8, 9, 9, 9, 9, 9, 9, 7 )YC 
779 SYMBOL 73, 69, 24, 24, 24, 24, 24, 69, 8 DT 1369 SYHBOL 132, 8, 8, 8, 9, 9, 8, 9, 255 AM 
789 SYMBOL 74, 38, 12, 12, 12, 284, 149, 88, ÿ DEH | 1378 SYMBOL 133, 8, 8, 8, 9, 9, 9, 6, 255 YAP 
799 SYMBOL 75, 238, 198, 194, 129, 198, 198, 238, # KP 1389 SYMBOL 134, 9, #, 5, 9, 6, 8, 8, 249 >AK 
868 SYMBOL 76, 249, 96, 96, 96, 98, 192, 238, 8 . 26H | 1398 SYMBOL 135, 5, 7, 7, 7, 7, 17,1, 1 >YM 
819 SYMBOL 77, 142, 228, 252, 124, 172, 172, 142, 8 DKK | 1498 SYMBOL 136, 191, 31, 199, 254, 254, 254, 254, 255 DNY 


829 SYHBOL 78, 198, 226, 114, 186, 156, 142, 198, # DLN | L4is SYMBOL 197, 264, 124, 62, 63, 63, 63, 63, 127 JU 
835 SYMBOL 79, 198, 198, 198, 198, 198, 198, 198, #  DLP $ 1429 SYMBOL 138, 298, 112, 248, 249, 248, 28, 249, 24 PR 
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."tCLEAR INPUT:WHILE INKEY$C" ":WEND:GOSUB 1769:RETU 
RN 


1438 SYMBOL 139, 7, 7, 7, 7, 7, 7, 1,7 >YN 
1449 SYMBOL 149, 255, 254, 252, 248, 248, 248, 252, 25 )QA 
4 

1459 SYHBOL 141, 255, 63, 31, 15, 79, 143, 31, 63 >HU 
1469 SYMBOL 142, 249, 249, 249, 249, 249, 249, 249, 24 )PN 
f : 

1478 SYHBOL 143, 7, 7, 7, 6, 6, 6, 6, 6 )YG 
1489 SYMBOL 144, 255, 255, ÿ, 255, 128, 189, 128, 128 NE 
1499 SYMBOL 145, 247, 255, #, 255, 9, 118, 9, ÿ )FJ 
1599 SYMBOL 146, 249, 249, 112, 176, 176, 176, 176, 17 >PD 
6 

1519 SYMBOL 147, 6, 8, 9, 9, 5, 9, 9, 9 )YG 
1528 SYMBOL 148, 255, 9, 9, 8, 9, 9, 9, 9 )AC 
1538 SYMBOL 149, 255, 8, #8, 8, 9, 8, 8, D )AE 
1548 SYMBOL 159, 176, 9, 9, 9, 9, 9, 8, 9 >ZH 
155f RETURN )FE 
1568 CLS )AB 
1578 INK 9,26:INK 1,26: INK 2,26: INK 3,26:BORDER 26 > RP 
1589 PLOT 1,2,1:DRAW 1,397:PLOT 2,399:DRAW 638,399:PLOT )AE 
639,397:DRAN 639,2:PLOT 637,1:DRAW 2,1 

1599 PLOT 8,8:DRAW 16,8:PLOT 6,19:DRAW 6,399:PLOT 8,392 ME 
:DRAW 16,392 

1698 PLOT 632,8:DRAW 624,8:PLOT 634, 18:DRAW 634,399:PLO DAF 
T 632,392:DRAW 624, 392 

1619 VINDOW 3,38,2,24:PAPER #: >XF 
1629 RETURN )FC 
1638 CLS:PRINT"Progranme à inserer dans les progra )HC 
mmes BASIC." 

1649 PRINT:PRINT"19 MEMORY &SFFF:LOAD"+CHR$(34)+"ROUTIN DHW 
EP. BIN"+CHR$ (34) +", &8699" 

1658 PRINT"28 CALL &9BFE )TX 
1669 PRINT"39 CALL 49997, 7" NY 
1678 PRINT"48 INPUT"+CHR$(34)+"Que dire ?>"+CHR$(34)+", DFR 
af" 

1688 PRINT"58 CALL &998B, A$" DV 
1699 PRINT"69 GOTO 49" >RA 
1798 PRINT:PRINT"Sauvegarder?(o/n)" )LC 
1719 a$="" )CB 
1728 a$=INKEYS$:1F A$="" THEN 1728 )ZF 
1738 IF A$="N" OR A$="n" THEN CLS:RETURN >GV 
1749 IF A$="o" OR A$="0" THEN PRINT"Inserer DISK+espace DUP 
1758 GOTO 1729 )NA 
1769 ON ERROR GOTO 1868:SAVE"ROUTINEP.BIN",b,&8699,&286 )CP 
E 

1778 OPENOUT"SPEAKERL. BAS" >XH 
1789 PRINT#9,"19 MEMORY &5FFF:LOAD"+CHR$(34)+"ROUTINEP. )FZ 
BIN"+CHR$(34)+", &8699" 

1799 PRINT49,"28 CALL &9BFE" DB 
1899 PRINT#9,"39 CALL 49997, 7" XU 
1818 PRINT49,"48 INPUT"+CHR$(34)+"Que dire ?)"+CHR$(34) DJE 
+",a$" 

1829 PRINT49, "58 CALL &998B,A$" YU 
1839 PRINT49,"68 GOTO 49" DUE 
1849 CLOSEOUT )2D 
1859 RETURN >FH 
1869 RESUME NEXT )HL 
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3 NUITS BAS 


18 A=&CPGB:F-LEVGE:L=1BO:WHILE AC:F:FOR A=A TO A+I5:READ Cé:K=VAL 


("R"+CS):S=S+K+65536#(S+K>32767): IF AC=F THEN PDKE A,K 


28 NEXT:READ D$:T=VAL("&"+D$):1F TC>S THEN PRINT CHR$(7);"Erreur 


ligne";L:END ELSE L=L+5:WEND 

39 SAVE "routinep",b,4C998, &286E 

198 DATA 99,86,99,00,99, 09,18, 3C,TE,FF, 18,18, 18,18,18,18,9261 
195 DATA 18,18,FF,7E,3C,18,19,39,78,FF,FF, 79, 39,19, 98,0C,97D4 
119 DATA BE, FF,FF,8E, 9C, 88, 99,99,18,3C,TE,FF,FF,99,98,09,9CD2 
115 DATA FF,FF,7E,3C, 18,99,89,E9,F8,FE,F6,E8, 89,99, 92,9E, 1569 
128 DATA SE,FE,3E, 8E, 92, 99, 38, 38,92, 7, 19,28, 28, 28, 38, 38, 1969 
125 DATA 19,FE, 19,28, 44,82, 38,38, 12, 7C, 99,28, 24, 22, 38, 38, 1DD8 
139 DATA 99,7C, 12,28, 48, B8,49, 3C, 18, 3C, 3C, 3C, 18,98, 3C,FF, 2249 
135 DATA FF,18,9C, 18,39, 18, 18, 3C, 7E, 18, 18, 7E, 3C, 18,89,24, 25C4 
149 DATA 66,FF,66, 24,99, 99, 29, 2F, 48,45, 48, 4C, 4F,57,29, 8D, 29F6 
145 DATA 99,90,09,00,95,00,06,00,60,00,50,00, 99,09, 89,08, 29F6 
159 DATA 99,69,00,80,99, 99,99, 06, 00,00, 99, 09,98, 00,006,98,29F6 
155 DATA 99,90,90,00,09,00,09,00,09,09,00,09, 90,00, 60,09, 29F6 
169 DATA 99,89,09,89,09, 99,09, 00,09,00,98,90,99,08,08,90, 29F6 
165 DATA 99,00,00,00,06,00,06,00,00,09,66,00,80,09, 99,00, 29F6 
179 DATA 99,86,89, 89,09, 09,06, 00,09,00,99,90,09,98, 08,99, 29F6 
175 DATA 99,99,09,00,06,89,08,00,00,06,09,06, 09,09, 00,09, 29F6 
188 DATA 89, 60,89,09, 09, 00,09, 00,00, 00, 09,09,98,08,90,99,29F6 
185 DATA 96,00,90,09,06,09,086,00,06,00,00,09,00,09,99,08, 29F6 
199 DATA 99,99,09,09,00,00,09,00,09,00,06, 00,99, 08,09,99,29F6 
195 DATA 86,08, 00,00,00,00,09, 00,00, 00,60,09, 90,09, 89,09, 29F6 
288 DATA 69,989,09,09, 99,09, 00, 00,09,00,99, 00,06, 00,66,66,29F6 
295 DATA 68,90,09,09,00, 90,68, 09,06, 00,00, 00, 69,90, 90,99, 29F6 
219 DATA 89, 989,80, 60,09, 09, 0, 00,06, 06,90,09,90,98,96, 08, 29F6 
215 DATA 69,00,98,09,09,00,06, 00,69, 69,99,00, 09,00, 90,00,29F6 
229 DATA 89,89,09,89,99, 89, CD, 32, 8A,F3,21,16,87,22,37,68,2E11 
225 DATA 2A,37,88,22,3C,88,7E,FE, 8D, 28,85, CD, 42, BA, 18,F8, 3437 
238 DATA FB,C9,11,12,63,98,94,1F,87,9C, 4E,9C, 1F,87,19,87, 3ABF 
235 DATA 1C,87,4F,99,96,F4,ED, 79,96,F6,3E, 89, ED, 79, AF, ED, 42A6 
249 DATA 79,C9,86,F6,3E, CS, ED, 79, 86,F4,ED,59,96,F6, AF, ED, 4C29 
245 DATA 79,C9,21,63,98,CD,F9,88,C9,3E, 83, CD, 62, 88,C9,CD, 5523 
258 DATA E4,6E,7E, FE, 31,D8,FE, 39, DS, D6, 38, E5,67, 3A, 32, 88, 5E67 
255 DATA 84,D6,94,32,32,88,E1, 23,22, 37,88, C9, 32, 36,88,22,6471 
269 DATA 34,88, 1E, 91, CD, 52, 88, AF, CD, 44, 88, 1E, 99, CD, 52, 88, 6B98 
265 DATA AF,CD, 44,88, 1E,97,CD, 52,88, 3E,3E, CD, 44, 88, 3A, 43, 71A6 
279 DATA 88,5F,CD, 52, 88, 3A, 36, 88,87,87,87,57,CD,17,8A,E6, 796C 
275 DATA 3F,4F,2A,34,88,AF, 96,09, ED, 4A, 1E, 98, 7E, 09, 60,99, 7078 
288 DATA E6,8F,CD, 44,88, 3A, 32, 88, 47,19,FE, 7E, CB, 2F,CB, 2F,84B9 
285 DATA CB,2F,CB,2F,E6,6F,CD, 44,88, 3A, 32, 88, 47, 19,FE, 23, 8BA7 
298 DATA 1D,C2,CC, 88, 15, C2, BC, B8, C9, 32, 36, 88, 22, 34, 88, 1E, 92AA 
295 DATA 91,CD,52,88,AF,CD, 44,88, 1E,69,CD, 52,88, AF,CD, 44, 9A1F 
389 DATA 88, 1E,97,CD,52, 88, 3E, 3E, CD, 44, 88, 3A, 43,88,5F, CD, AGB9 
395 DATA 52,88, 34,36, 88,57, 2A, 34,88, 1E,3F, 7E,E6,9F,CD, 44, AGA9 
319 DATA 88, 34,32, 88, 47, 19,FE, 7E, CB, 2F,C9,2F,CB,2F,CB, 2F, ADE8 
315 DATA E6,9F, CD, 44,88, 3A, 32,88, 47,19,FE, 09,89, 09,23, 1D, B2F7 
328 DATA C2,2B,89,15,C2, 26,89, C9, 74,FF,FF,94,38,FB,CF, 68, BBB4 
325 DATA 88, 78,45,95,CD,6A, 44,65, AA, 68,65, 76,88, B8, 88,68, C37B 
339 DATA 55,86, A9, 8A,56, 65,87, A8, CB, 84,56, 85, BA, BA, 78,67, CBEG 





335 DATA 88,88,66,55, 76,88,56,54,65,65,56,55, 44,54, 66,56, D222 
349 DATA 55,65,56, 54, 86, 46, 44,99,58, 65, 88, 48, A3, AB, 76, C9, D949 
345 DATA 44,21, 84,69, 44, C7, 4A, 52, A9, 48, 72, ED, BB, 78,55, 24, E81a 
354 DATA 39, Fa, CF, 19,FB, 4F, 54, 08,68, 74, 88, 56, 85, 8,56, 7, E7F4 
355 DATA 78,76, 98,99, 99, 89,66, 76,67,65,98, 78, 44,54, BB, AB, EFEA 
369 DATA 69,55, 76, 88,56, 65,98, 96, 78, 78, B9, BB, 78, 89, 76,65, F7CC 
365 DATA 78,48, 87,75, 8B,B5, 76, A8, A9, 44, 5D, 49, 8B, 83, 95, 78, FF97 
375 DATA 14,60, 74, C2, B4,55, 78,85, A8, 78,98, 85,87, C4,85, 85, 87F4 
375 DATA 3B,B6, 47, 78, A4,94,68,87,66, 74, 7A, 89,67, C8, 46,83, 1998 
389 DATA 7B,C5,C1,B4,96, 87,83, 34, 39,88, EE, 65, CE, 25, 32, 39, 1838 
385 DATA 88,21, 39,86, CB, 16,23, CB, 16,23, CB, 16, 34, 39, 88, E6, 1E6F 
399 DATA 8F,C9,3E, 65, 32, 39, 88, 3E, 25, 32, 3A, 88, 3E, 63, 32, 3B, 2342 
395 DATA 88,C9, 34, 33,88, 32, 32, 86, 2A, 37,88, 7E, FE, 41, CA, DC, 2ACQ 
499 DATA 8A,FE,55, CA, 2D, BC, FE, 49, CA,94, BB, FE, 45, CA, 5E, BB, 3446 
485 DATA FE, 4F, CA, D2,8B,FE,53, CA, CB, 8D,FE, 2F,CA, 78,80, FE, 3F26 
418 DATA 44,CA,94,8C,FE, 43, CA, 87, 8D,FE, 54, CA,54, BD, FE, 4E, 4B3C 
415 DATA CA, F2, 8D,FE, 5A, CA, QC, 8D,FE, 42, CA, 1B, BE, FE, 46, CA, 5291 
429 DATA C4, 8E,FE, 47, CA, Di,8E,FE, 4, CA, 9F,6E,FE, 4B,CA, GA, 5D4D 
425 DATA 6E,FE, 4C, CA, 3B,8E,FE, 4D, CA, 48, 8E,FE, 58, CA, 7D, 8E, 6686 
438 DATA FE, 52, CA, 2E,8E,FE, 56, CA,55,8E, FE, 57, CA,92,6E, FE, 7994 
435 DATA 59,CA,B7,6E, FE, 25, 28, A, 23, 22, 37,88, 3E, 04, CD, 62, 76CC 
449 DATA 88,C9,23, 22, 37, 88, 3E, 92, CD, 62,88, C9, 23,46, 23, 22, 7C8F 
445 DATA 37,88, CD,6F, 88, 78,FE, 59, 28, 38,FE, 45, 28,5E,FE, 41, 8449 
458 DATA 28,63,FE, 57, 28,45,FE, 48,28, 1F,FE, 4F,28,12,FE, 49, 8AFI 
455 DATA 28,95, 2B, 22, 37,88, C9, 21,83,8F,3E, 49, CD, F9, 88, C9, 9184 
468 DATA 21,43,99,3E, 99, CD, F9, 88, C9, 21,82, 91,3E,07,CD,F9, 9915 
465 DATA 88,09, 21,11,93,3E, 99, CD, F9, 88, 21, 92,93, 3E, 85, CD, AD16 
478 DATA F9,88,21,53,93,3E, 92, CD, F9, 88, C9, 21,58, 89, 3E, 09, A73E 
475 DATA CD, F9, 88, 21, D2,92, 3E, 96, CD, F9, 88, C9, 21,58, 89,3E, AFAC 
489 DATA 87,CD,F9, 86, C9, 21,43, 6F, 3E, 99, CD, F9, 88, C9, 23, 46, B784 
485 DATA 23, 22, 37,88, CD,6F, 88, 78,FE, 45,28, 16,FE, 48, 28, 1B, BDCE 
499 DATA FE, 52, 28,95, 28, 22, 37,88, C9, 21,18,95,3E, 69, CD, F9, C3F3 
495 DATA 86, C9, 21,83,99,3E, 97, CD, F9, 88,C9, 21,E3,97, 3€, 97, CBB4 
589 DATA CD,F9,88,C9, 23, 46, 23, 22, 37,88,CD,6F, 88, 78,FE, 59, D3CB 
585 DATA 28,16,FE,56, 28, 23,FE, 48, 28,85, 28, 22, 37,88, C9, 21, D913 
519 DATA 92,93, 3E, 97, CD, F9, 88, C9, 21,43, 6F, 3E, 99, CD, F9,88,E11C 
515 DATA 21,92,93,3E, 96, CD, F9, 88, C9, 21,92, 93,3E, 85, CD, F9, E9BC 
529 DATA 88, C9, 23, 46, 23, 22, 37,88, CD,6F, 86, 78,FE, 57, 28, 1A, EFOD 
525 DATA FE, 59,28, 27,FE, 46, 28,3C,FE, 4F, 28,45, 2B, 22, 37,88, F573 
538 DATA C9, 21,D9,94, 3E, 88, CD, F9, 88, C9, 21,91,94, 3E, 49, CD, FD78 
535 DATA F9,88,21,D2,92,3E,45, CD, F9, 88, C9, 21, 43,99, 3E, 89, 0513 
548 DATA CD,F9,88, 21,92, 93, 3E, 94, CD, F9, 88, 21,53, 93, 8E, 92, AC7E 
545 DATA CD, F9,88, C9, 21,91,94,3E, 06, CD, F9, 88, CO, 23, 46, 23, 14C4 
559 DATA 22, 97,88, CD, 6F, 88, 78,FE, 56, 28, 34,FE, 57,28, 1F,FE, 1C2D 
555 DATA 48,28, 12,FE,55, 28,5, 28, 22, 37,88, C9,21,61,97,3E, 215B 
569 DATA 98, CD,F9, 88, C9, 21, 23,98, 3E, 87, CD, F9,88, C9, 21,83, 28D6 
565 DATA 96,3E,47, CD, F9, 88, 21,D2,92,3E, 96, CD, F9, 88, CO, 21, 39FA 
579 DATA 93,98,3E, 08, CD, F9, 88, C9, 23, 46, 23, 22, 37,88, CD, 6F, 3793 
575 DATA 88, 78,FE, 48, 28,85, 2B, 22, 37,88,C9, 21,52, 92, 3E, 04, 3D22 
589 DATA CD, 80,88, C9, 23, 7E,FE, 48, CA, B7,8C,FE, 52, CA, CC, BC, 4732 
585 DATA FE,55,CA,E9, 8C, 22, 37,88, CD,69, 86, 21, 19,94, 3E,91, 467 
599 DATA CD,F9,88, CD, 69, 86, C9, 23, 22,37, 88, 21, 28,97, 3E, 94, 555A 
595 DATA CD, F9,88,21,52,92,3E, #1, CD, 8C, 88, C9, 23, 22, 37,88, SCJA 
689 DATA 21,A8,96,3E, 42, CD, F9, 88, 21,D9, 93,3, 43,CD, F9, 88, 6492 
685 DATA 21,C3,6F,3E, 97, CD, F9, 86, C9, 23, 23, 22, 37,88, 21, A8, 6B49 
619 DATA 96,3E,85, CD, F9, 868, 21,D9,93,3E, 92, CD, F9, 88, 21,93, 7246 
615 DATA 99,3E,98, CD, F9, 88,C9, 23, 7E, 23, 22,37, 88,FE, 48, 28, 7946 
629 DATA 2A,FE,54, 28, 85, 2B, 22, 37,68, C9, 21, A8,96,3E, 2, CD, 7FB8 
625 DATA F9,88,21,97,89,3E, 41, CD, F9,88, 21, A9, 96,3E, 81,CD, 873A 
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638 DATA F9,88,21,D7,89,3E, 01, CD,F9,88, C9, 21, AB,96, 3E, 46, 8F2D 
635 DATA CD,F9,88,21,59,95,3E, 93, CD, F9, 86, 21,58, 89, 3E, 91, 9651 
64 DATA CD,F9,88, C9, 23, 7E,FE, 48, 28, 18, FE, 52, 28, 21, 22,37, 9D81 
645 DATA 68,3E,93,CD,62, 88, 21,D7, 89, 3E, 81, CD, FO, 88, CD, 60, A545 
658 DATA 88, C9, 23, 22, 37, 88, 21, E8, 96, 3E, 85, CD,8C,88,C9, 23, AC44 
655 DATA 22,37,88,21,A9,96,3E, 84, CD, F9, 88, 21, 59,95, 3E, 93, 8259 
668 DATA CD, F9,88, 21,C3, 8F,3E, 97, CD, F9, 88, C9, 23, 7E,FE, 46, BB54 
665 DATA 28, 14,22, 37,88, 21, 42,91,3E,85,CD, F9, 88, 21, D8, 95, C17C 
678 DATA 3E,85,CD, 80,88, CO, 23, 22, 37,88, 21,53,93, 8, 93, CD, C782 
675 DATA F9,88,21,58,95,3E, 93, CD, 8C, 88, CO, 23, 7E,FE, 48, 28, CFA3 
688 DATA 14,22, 37,88, 34, 32, 88,6, 92, 32, 32, 88, 21, 8,95, 3E, D474 
685 DATA 95, CD, 8C,88, C9, 23, 22, 37,88, 21,59,95, 3E, 46, CD, BC, DACA 
698 DATA 88,09, 23, 7E,FE, 58, 28, 16, 22, 37,88, 3E, 91, CD, 62, 88,E127 
695 DATA 21,43,91,3E, 97, CD,F9, 88, 3E, 81, CD, 62, 88, C9, 23, 22, E773 
789 DATA 37,88, 21,59,94,3E, 7, CD, F9, 88, C9, 23, 22, 37,88, CD, EEG4 
765 DATA 69,88, 21, 12,92, 3E,81,CD, F9, 88, CD, 69, 86, CO, 23, 22, F573 
719 DATA 37,88,21,C3,8F,3E, 87, CD, F9, 88, C9, 23, 22, 37,88, 21, FC26 
715 DATA C3,98,3E,97,CD, F9, 88, C9, 23, 22, 37,88, 21, 42,91, 3E, 4398 
729 DATA 87,CD,F9, 88, CO, 23, 22, 37, 88, 21, C2, 91,3E,95, CD, F9, AAA 
725 DATA 88,21, 52,92, 3E,91,CD, 8C, 88, CO, 23, 22, 37,88, CD, 69, 1154 
738 DATA 88,21,97,89,3E, 91, CD, F9, 88, CD, 69, 88, C9, 23, 22, 37, 18B3 
735 DATA 88,CD,69,88,21,92, 92, 3E, 81, CD, F9, 88, 3E, 93, CD, 69, 2542 
749 DATA 88, C9, 23, 22, 37,88, 21,D2, 92, 3E, 97, CD, F9, 88, C9, 23, 2708 
745 DATA 22,37,88,CD,69,88,21, 19,94,9E,81,CD,F9,88, 21,54, 2DFD 
758 DATA 95,3E,84, CD, 8C, 86, C9, 23, 22, 37,88, 21,53,93, 3E, 97, 33CE 
755 DATA CD, F9,88,C9, 23, 22, 37,88, 21, 18,96,3E, 85, CD, BC, 88, 3ADC 
768 DATA C9,23,22, 37,88, CD, 69, 88, 21,98,95, 3E, 91, CD, F9, 88, 423A 
765 DATA CD,69,88,C9,F5,E5, DS, ED, 5B, 3C, 88, 24, 3E, 88, AF, ED, 4CBB 
778 DATA 52,7C,B5, 28,8E, 24, 49,88, AF, ED, 52, 7C, B5, 28, 23, Di,52EE 
775 DATA Et, F1, C9, 34,42,88,FE, 3F, 28, 06,FE, 2E, 28,88, 18,EF, SASE 
789 DATA 34, 32,88, 3D, 32, 32, 86, 18, E6, 34, 32, 88, 3C, 32, 32, 88, 5F95 
785 DATA 18,DD, 34, 42,88, FE, 3F, 28,46, FE, 2E, 28, 8C, 18, DO, 34,657B 
798 DATA 32,88, 3, 30, 32, 32, 88, 18, C6, 34, 32,88, C, 3C, 32, 32, 6A49 
795 DATA 88,18,8C,96,EE,FF, ED, 44, 19,52,D9,EF, BD, 58, 45,66, 7343 
888 DATA 86,88, 77,48, BA, 98, 48, 44,53, A7, CB, AB,68,55,65, 87, 7B6A 
885 DATA 99,89, 88,88, 9,99, 86, 78,98, A9, 99, 78,66, 87,98, 88, 843D 
818 DATA 68,66, 75,88,88, 78,67,66,66,66,66, 66, 76, 77, 66,67, 8B28 
815 DATA 67,87, 77,66,96,B8,FF, CB, FB, 94,85, 73, 78,58, BA, OD, 94BF 
825 DATA 99,89,88, 44,64,58, 86, A9, AA, 88, 86,58, 54, 76,87, 88, 9CB1 
825 DATA 99, 9A, 78,88,67,66,86, 88, A, CA, AA, A8, 88, 86, 76,88, A551 
838 DATA 89,88,89,67,66,65,65,65,66,66,66,56,55,55,55, 44, ABB2 
835 DATA 77,68,2B, 44,75, EA,FF, AC, DA, EE, 54, 32, 65,56, 55, 76, B3E4 
849 DATA BA,CD,8B, 87,99, 46, 22, 53, 77,66,97, AA, AB, 8A, 66, 76, BCA2 
845 DATA 57,44, 75,98, 88,98, AA, BB, AB, 89, 87, 88, 56, 75, 88,88, Cä4D 
858 DATA 88,88,68,56,55,55,55,55,55,66,56,66,56,55,55, 44, CA2A 
855 DATA 65,66,55,44,54,55,55, 76,89, FD,FF, FF, EE, DE, CD, AB, D3FA 
868 DATA 68,45, 23, 32,44, 44,55, 76, A9,BA,BB, AB, AA, OA, 80,68, DB4D 
865 DATA 55,44,44,54,65,66,87,98, A9, AA, AA, OA, A9, AA, AA, OA, E396 
878 DATA 89, 88,88, 88,88,66,55,55,55,55,45, 44,54,55,55, 45, E9C5 
875 DATA 44,44,54,55,65,66,67,87,89,EC,FF,FF,CF, BA, 24,01, F1D9 
888 DATA 31,75,DA,FE,FF, CE, 84,56, 44,54,65, 88, 99, AA, AA, BB, FB28 
885 DATA BB, AA,89,57,45,54,75, A8,CB, DD, DD, BC, 9A,68,56,55, 8411 
898 DATA 65,87, A9, BB, BB, 9A, 88,66, 55,55, 66, 87,98, 99, 99, 88, AC8D 
895 DATA 67,56,55,35,43,87,E1, A4, 79, BD, 8, FD, DA, CF, DB,FB, 163D 
999 DATA 94, AB,68,96,45,54, 25,52,44,54,56,65, 87, 76,9A,98, D12 
995 DATA AA, 99, AA, 89, A9, 89,88, 68,86,68,65,67,85, 77, 79, A9, 2582 
918 DATA 87, AA, A4, 94, A9, 96, 88, 88,67,66,55,55,55,54,55, 44, 2091 
915 DATA 45,54,34,55,55,75,A8,DB,FE,EF, BE, 68,68,55,54,54, 3588 
928 DATA 55,55,66, 87,99, AA, AB, AA, 89,66,55,55,55,65, 76, 87, 3CBA 





925 DATA 88,99,99,99,9A,99,99,98,88,86,68,67,67, 77, 76,66, 44DA 

938 DATA 66,66,66,66,66,66,66,66,66,66,66,66,66,66,66,66, 4B3A 

935 DATA 66,66,55,55,66,66, 76,94, A6, BB, CB, BB, DE, ED, DD, DD, 54F8 

94ÿ DATA BC, BC, BA, 94,99, 78,68,66,56,55,55,55,55,55,66,65, 5C6D 

945 DATA 66, 76, 77,66, 88, 88,98, 99, AA, AA, AA, BA, BA, AB, AA, AA, 65FA 

958 DATA 99,89,88,68,66,55,55,44,44,44,44,44,44,44,54,45,6B91 

955 DATA 55,65,32,43,34,43,44,55,55,65, 76, B9, AB, 9A, BB, CD, 7283 

969 DATA DD, DD,EE, ED, DD, DC, BB, AB, 99, 89, 88, 66,56,55, 45,44, 7C7B 

965 DATA 54,55,55,55,65,66,87, 88,88,99,99, AA, AA, BA, AB, BB, 84D6 

979 DATA AB, BB,BB, AA, 94, 89, 88, 78,66, 56,55, 44,44, 34, 33, 33, BBF7 

975 DATA 34,43,55,D7,FF,BF,40,33,67,68, 89, A9, DD, 88, 24, 22, 0383 

988 DATA 95, AA, 94, 89,99, 58, 34,54, A7, BB, 8A,68,66,66,65,97,9B7A 

985 DATA BA, AB,68,55, 76,98, 89,98, 88,68, 56, 75, 88,89, 68,66, A365 

999 DATA 66,66,66, 76,88, 67,56,55, 76,67, 76,66, 77,66,66,56, A9F9 

995 DATA 66,67,99,99,99,78,77,77,67,66,77,717,77,98,99,99,B1F3 

1899 DATA A9, AA,99,99,99, 78, 77, 77,67,66,77,77,77,98,99,99, BA73 
1905 DATA A9, AA, 89,99, 99,99, AA, 94, 99,99, 89, 77,77, 77,66, 76,C35A 
1919 DATA 77,77,87,99, 99,99, AA, A, 99,09, 89, 77,77, 77,66, 76, CBDA 
1915 DATA 77,77,67,99,99,99, AA, 9A, 99,99, 89, 77, 77, 77,66, 76, D4SA 
1928 DATA 77,77,86, 88,98, 88, 88, 88,09, 89, 88, 88, 88, 88, 99, 88, DCE9 
1925 DATA 86,96,99, 88, 88, 88, 88, 88, 88, 88, 88, 88, 88, 78,88,87,F579 
1939 DATA 77,77,68,88, 77,87,88,88,77,66,66,66,56,55,55,55, EC83 
1935 DATA 66,B8,FE,FF,CE, 9A, 89, 48,24, 91,29,55,66,56,55,55,F3D7 
1849 DATA 24,00, 88, 88, 68,86, 78,97, 89, 88,76, 76, 88, 89, 99, 88,FB37 
1945 DATA 68,56,87,99, A9, 89,66, 56, 76, 88, 88,89, 78, 77,88,88,9311 
1959 DATA 99,88,68,55, 75, 9,94, 89,68,55,66, 86, A9, 94, 88,56, ZAFA 
1955 DATA 86,88, 88,68, 75, 77,98, AA,98,89,58,55, 66, B9, AB, 8A, 1348 
1968 DATA 58,65, 88,99,99, A9, DA, BC, ED, CD,BB,CC, DC, FD,FF,FF,1F16 
1965 DATA FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,FF,8C,94, 00,99, 2B9A 
1970 DATA 90,00,00,00,06,90,09,08,19,32,45,13,60,00,08,99,2C34 
1975 DATA 99,00,09,09,90,09,09,09,16,11,19,11,11,32,54,55, 2D62 
1988 DATA 76,76, 44,55, 76,B9,DC,FE,FF,DE, CD, AB, 94, 88,56, 45, 3792 
1985 DATA 23,22,43,54,86,98, A9, AA, 9A, 99,99, 89, 88,56, 45, 44, 3E0B 
1899 DATA 54,55,66, 76,87, 88,98,99,99, A9, AA, AA, AA, OA, 89, 78, 4GAB 
1995 DATA 66,66,66,66,56,55,55,55,66,66,66,56,55,55,55,55, 4C74 
1198 DATA 55,45,B6,FF, A5,FB,6A,84,95,56, 73, D9,69, BB, 8C, 56, 558B 
1185 DATA 66,67,44, A6, 8A,96, AA, 68, 65, 76, 46, 75, 99, 88, A9, 8A, SD5SE 
1119 DATA 67,76,67,65,97,88,D2,9A, A9, A9,59,65,89, 55,98, 88, 65Aÿ 
1115 DATA 67,66,46,54,66,55,66,55, 86,56, 76,56,55,56,65,45,6B7A 
1128 DATA 87,58, 75,55,95,54,5C,87, A9, AB, AD, BB, BD, 9D,9F, AB, 744C 
1125 DATA AB,8A,8B,88,88,46,47,44,55,44,55,49,65,55, 87, 86, 7AE2 
1139 DATA 97,88, 99,98, A9, 99,94, 98, 99,98, 94,99, 99,98, BA, 88, 844D 
1135 DATA 88,78,68,66,56,55,45,54,44,54,44,55,54,55,44,64,B9E1 
1149 DATA 54,47,44,58,D5, 1F,D7,6F, A5, 88, 84, 34, 8B, 34, B6,5A,9186 
1145 DATA B7,60C,89,89,87,55,67,44,87,58,99, 89, 99,99, 88, 86, 9983 
1159 DATA 86,65, 688,98, 89, AB, 9B, B9, 89,86,58,65,55,54,55,67, A149 
1155 DATA 66,88,66,87,55,56,64,46, 75,46,84,59, 75,89, 74,67, A7EA 
1168 DATA 76,66,67,66, 77,87, 77,89, 88, 89, 89, 89, AB, 99, 9A, A9, B538 
1165 DATA SA,BA,9A, 9A, A9, 89, 89, 88, 79,87, 77,67,66,67, 76, 76, BB9A 
1178 DATA 67,77, 77,88,97,89,99,99, AA, A9, OA, AA, A9, 9A, 99,89, C1C5 
1175 DATA 99,87,78,77,67,77,12,66,67,66,77,87, 77,89, BB, 89,C996 
1188 DATA 3A,FB,98,6C, A9, A5, 5A, 89, A8,58,67,67,55,55,66,56, DSA4 
1185 DATA 76,88, 76,86,87,54,55,47,55,85,65,66, 88, BA, AB, AA,DBE 
1199 DATA 89,968, 89,67, 88, 89,98, BA, AB, BA, BC, AB, AA, AA, 78,87,E1B1 
1195 DATA 78,66,86,88, 87,98, 88, 77, 78,56,55,56,44,54,45,44,E855 
1289 DATA 44, A6, AA, BB, CB, BD, BD, AB, AA, BA, 9A, 89, 88, 88, 88,66,F219 
1295 DATA 66,66,66,67,87, 78,88, 88, 88,66, 87, 77,77,17,77,88,F99A 
1219 DATA 88,88, 99, AA, AA, AA, AA, 99,99,99,88,88,66,66,55,55,423C 
1215 DATA 55,55,55,55,55,55,55,55,55,55,65,56,55,55,55,55,979D 
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1229 DATA 45,66,66, F7,FF,0E,5B, 74,88,56,54, 75,DB, BD, 88, 46, 191E 
1225 DATA B1,58,45,65,87,CB, 84,68, 56, 76, 56,54, 87,BA, AB, 78, 181F 
1239 DATA 77,66,66,56,96, DA, BD, 88, 56, 75,67, 76,98, 94, 88,66, 2938 
1235 DATA 65,77,66,56,66,87,66,55,65,66,56,65, 66, 77, 88,67, 26CA 
1249 DATA 95,DB,FF,FF, 44, 92,90, 73,FB,FF,AF, 48, 23, 42, 75,88, 2F4A 
1245 DATA 99,98, AA, AA, 68,25, 22, 53,86, ED, BD, 69, 24, 32, 75, A9, 3719 
1259 DATA AB,9A, 88,88, 49, 89,67, 66, 87, 89, 89,69, 67,66, 66,66, 3EFF 
1255 DATA 55,66,86,78,66,55,55,55,66,66,66,66, 66,66, 56,45, 451C 
1269 DATA 67,D7,FF,AB, CB, AC, 89, 26,52, 87,56, 86, BA, CB, BB, 76, 4E65 
1265 DATA 88,48,44,55, 76,89, 88, B9, AB, 88, 67,66, 66,45, 75,98, 55C6 
1278 DATA 99,99, 99, BA, BA, 87,88, 78,77, 76,98, 89, 87, 88, 78,66, 5E57 
1275 DATA 55,65,66,65,66,66,66,56,65,56,55,65,56,66,66,66,6461 
1289 DATA 8B,43,97, 38,93, 4C,55, 3F, 74,59, 58,C8, 43, C7, 26, C3, 6B14 
1285 DATA 18,77, 74,34, C9, 82, A1, 2B, 81, 20, 76, A8, 36, 78, 7A, ED, 723E 
1299 DATA 48,46, 83, 47,38, A5, 34,85, 38,98, 64,89, 56, BB, 86, 83, 796E 
1295 DATA 67,87, 27, 77,80, 73,5E, 72, CC, 79,D8, 44, 47,59, 98,58, 8032 
1399 DATA 76,87,88,98, 99, AA, AA, AA, AA, 99, 89, 88, 88, 77, 66,66, 8995 
1395 DATA 55,45, 44,87, DC, BE, 09, B9, BB, 8A, 45,43, 54,55, 24, 42, 08GF 
1319 DATA 65,76,56,54,65, 77,66,86, CB, ED, CE, BB, BA, AB, 99, 66, 9953 
1315 DATA 65,66, 76,86, 77,87, 88, 89, 88, 78, 99, 99, 99,98, 99, JA, A1BF 
1328 DATA B6, 75,54, 48,99, 85,58,5B, 89, A6,96, 68, 88, AG, 78, 4A, AOAD 
1325 DATA 8B,A5, A5, 44, 4B,B7,B4, 7A, 4C, 87, C3, 78, 2C, 4B, C5, A4, BIEA 
1338 DATA 34,58, 99,95, 88, 49,87, 4,68, 84, A7, B5, 78, 4C, JA, A5, BASA 
1335 DATA 78,54,87,B5, 78,5C,68, A6, 78, 5A, A7,B3, 58, 2D, 80, DS, C23C 
1348 DATA 75,5A, 48, A4, 34, 78,85,58,65,66,64,66, A7, 98, 66, BA, C963 
1345 DATA 66,A7,A6,67,66,68, A6, 64, 67, A7,98,66, 66, A7, A, A5, DIB3 
1358 DATA 86,66, 77,68, 6,94, 59, 66, 89, A7, 89,65, 68, 86, A6, 76, DOAS 
1355 DATA 68,86, 66, AA, 68, 64, 76,86, 76, 74,66, A6, GA, 7A,66, A6,E15D 
1368 DATA 8A, 76, 7A, 84,95, 64, 46,65, 66, 64,66, A7,6A, 66, 89, 59, EBFA 
1365 DATA 49,89, 89,89, AB, 99, JA, A9, 9A, BA, JA, A, A9, 89, 88, 79, F1D4 
1378 DATA 87,77,67,66,67, 76, 76,67, 77, 77,88,97, 89, 99, 99, AA, FOCB 
1375 DATA A9, 9A, AA, A9, 94, 99, 89, 99, 87, 78, 77,67, 77, 76,66, 67, 424D 
1388 DATA 66, 77,87, 77,89, 88,89, 89, 89, AB, 99, JA, A9, QA, BA, SA, 9B46 
1385 DATA 86,88, 88,88, 88,88, 88, 88, 86,88, 86, 88, 88, 88, 88, 88, 13C6 
1399 DATA 88, 88, 88, 88, 88, 88, 88, 88, 88, 86, 88, 88, 88, 86, 88, 86, 1C46 
1395 DATA 88,88, 88,86, 86, 88, 88, 88, 88, 88, 88, 88, 88, 88, 88, 88, 24C6 
1499 DATA 88, 86, 88, 88, 88, 86, 88, 88, 86, 86, 86, 88, 88, 86, 88, 88, 2D45 
1495 DATA 88,88, 87,88, 79,86, 88, 76,86, 86, 66, 66, 76, 78,98, 88, 3548 
1418 DATA BA, 99, 88, 89, 79, 7A, 84,99, 89, A8, 98,98, 66, 88, 89, 79, 3DES 
1415 DATA 78,78,88,86,88,67,68,87,87,85, 67, 7A,88,8A, 8B, QA, 45E5 
1428 DATA 49,99, 49,98, A9, A9, 8,98, 8,96, 86, 76, 76, 78, 76,66, 4EFE 
1425 DATA 67,98,99, A9, AA, 9A, AA, 89, 88, 78, 67, 76,67, 76,87, 88,577F 
1438 DATA 99, 9A, A9, AA, 99, 99, 89, 77, 77, 77,66, 76, 77, 77,88, 88, SFFF 
1435 DATA A9, AA, A9, AA, 89,88, 78, 77, 77,66, 76, 77,87,99, 09, A9, 68D1 
1448 DATA AA, 99, 9A, 89, 88, 77,66, 87,99, 99, AA, AA, A9, 94, B6, 88, 71FC 
1445 DATA 77,D6,FC, CD,9C, 88, 88,56, 44, 76, BA, AB, 99,89, 78,56, 7B23 
1459 DATA 44,65,98,99, 99,99, 89, 56,45, 64,87, 88, 98,99, 99, 68, B2F8 
1455 DATA 55,65,86, A9, BB, AB, 84, 68,56, 66, 87,88, 88, 78,56,55, BAAF 
1469 DATA 55,55,65,66,66,56,66,55,55,56, 45,65, 87,88, 66,55, 90BA 
1465 DATA 55,98, 89, AA, 99, AA, 89, 89,67, 77,66, 77, 76,88, 97, A9, 9928 
1478 DATA 49, AB, 99,99, 87, 78, 76,67, 76, 77,97, 89, A9, QA, B9, 99, A22C 
1475 DATA 99,78,88,66, 76,66, 87,88, A9, 99, AA, 99, AA, 09, OA, 88, ABGS 
1488 DATA 88, 76,67,66, 77, 86,88,98,98, 89, AA, 99, AA, 89, 89, 67, B36F 
1485 DATA 77,66,77,55,87,F4,6F,95, F, 23, 67,86, 75,FE, 79, BB, BBF7 
1498 DATA 29,53, 76,66, B8,9C, 78,88,45,65,87,97, A4, 80, 87,56, C378 
1495 DATA 55,76,88,99,84,68,66,55, 76, AB, 98, BA, 58,65, 56, 76, CB14 
1599 DATA 99, 89,88,68,55,66, 66, 98,88, 77,66,55,56,66, 66, 86, D23D 
1595 DATA 57,87,56,21,32, 44, 44,64, 86, AA, 9A, 77, B9, FD, FF, CD, DA73 
1518 DATA BA, CB, CB, 8A,55,65, A7, AA, 89,98, B9, CC, AB, 68, 66, 88, E3FF 





1515 DATA 78,57,55,97, BA, AB, 94,99, AA, 9A, 68,66, 86,98, 99, DB, ECF6 
1529 DATA FD,FF, DF,AB, 89,68, 68,55,55, 76,88, 78, 56,66, 66, 56, F58D 
1525 DATA 34,22, 32, 08, 06,09, 09,09, 08,09, 00,05, 00,08, 00,09,F615 
1539 DATA 09,06,09,06,08,99,08,00,09,08,00,00,99,80,09,09,F615 
1535 DATA 99,09,09,08, 80,09, 00,09, 09, 09,00,09,00,08,06,08,F615 
1549 DATA 99,08,09,08,09,00,08,00,09,00,89,09,69,09,09,00,F615 
1545 DATA 99,08,89,91,82,98, 21, AD, 98, CD, Di, BC, CO, AD, 98, B2, FDES 
1559 DATA 98,9, C9,98, C3, 97,99, C3, 88, 99, 99,99, 89, 99, 09, 99, 9323 
1555 DATA 99,99, 99,09, 89,09,C3,FE, 98, 53,56, 45, 45,C4,53,41, 0891 
1569 DATA D9,43, 45,4E, 54, 45, D2, 09, 69,68, 09,08, 89,00, 09,09, 0B1B 
1565 DATA 99,09, 09,08, 89, 09,00,09, 09,00, 06,09, B7, 26, 4E,3E,0C7E 
1578 DATA 98,32, 43,88, C9, B7, 28,45,3E, BA, 32,43, 88, C9, B7, 29, 124D 
1575 DATA 3C,3E, 89, 32, 43,88, C9, FE, 91, 29, 32, DD, 7E,01,B7,28, 181A 
1588 DATA 2C,DD, 7E, 98, B7, 28, 26,FE, 15, 38, 22, 2F, C6, LA, 32, 33, 1D7F 
1585 DATA 88,C9,53,79,6E, 74,61, 78, 29,65, 72, 72,6F, 72, 2E, 4C, 241B 
1599 DATA 69,6E,65, 29, 74,6F,6F, 28,60, 6F,6E, 67, 2E, 21, 22, 90, 2943 
1595 DATA 18,96,E1,E1,E1, 21, 2F,99, 7E, CD, A, BB, 23, 7E,FE, 2E, 317A 
1689 DATA 29,F7,3E, 0, CD, 58, BB, 3E, SA, CD, 5A, BB, 3E, 87, CD, 54, 3854 
1685 DATA BB, C9,FE, 81, 29,07, DD,6E, 89, DD, 66,91, 7E, B7, CB, 23, 4070 
1619 DATA 46,23, 46, 21, 16, 87,57, 94, 77, 23,83, 15, 29, F9, 3E, BD, 4469 
1615 DATA 77,21,16,87, CD, 34,9C,CD, 16,88,C9,FE, 91,28, AE, DD, 4C1F 
1629 DATA 66,91, DD,6E, 68, 7E,B7,C8, 23,5E, 23,56, EB, 91, FE, 9A, 534C 
1625 DATA 57,3E, 29,92, 83, 7E, 82,23, 93, 15,C2, A5, 09, 3E, 24, 82, 5721 
1638 DATA 93,3E, 9D,92, CD, 37,9C,CD,E7, 94, CD, C3, 99, C9, 85, QB, SEF1 
1635 DATA F2,A9,29,21,FE, 0A, 22, BE, 00, 21, 08, 08, 22, 49, 8, 22, 8502 
1649 DATA 3E,88, 21,16, 87, 22, 37,88, 16,48, CD, E7, 99, 2, 37, 88, GAB3 
1645 DATA 3E, 8D, 77,CD, 16,88, C9, CD, A2, JA, DB, CD, F4, 99, CD, AE, 745F 
1659 DATA 9A,C3,E7,99, 2A, BE, 99, 7E,FE, 41,DA, 1F,94,FE, 5B, D2, 7E38 
1655 DATA 1F,94,D6,41,87,86,89,4F, 21,50, 9C, AF, ED, 4, 4E, 23, 8454 
1668 DATA 46, ED, 43, C8, 99, CD, 38, 9A, DB, CD, 93,94, C3, 15, QA, FE, BES4 
1665 DATA 28, CA,2E, 94,81, 5A,9C, ED, 43, CH, 99, C3, 15,94, 91,58, 0591 
1674 DATA 9C,ED, 43, C8, 99, C3, 15, QA, 2A, BE, 99, ED, 4B, CA, 99, A, SDB4 
1675 DATA FE, 29,28, 43,FE, 23, 28, 34, BE, C2, BD, JA, #3, 23, A, B7, A648 
1689 DATA 28,04, 7E,FE, 9D,CA, 8D,9A, SA, C3, 48, A, 83, 28, ED, 43, AAFQ 
1685 DATA CP,99, 22, BE, 99, 7E, CD, D, 94, 36, 8B, 0B, 8B, 9B, A, 93, BAED 
1699 DATA 93,93, 87,28, 91, 28, 23,22, BE, 99, 37, C9, 7E, FE, D, 28, BG4B 
1695 DATA 8C, 32, C2, 99, C3, 4C, 94, 7E, CD, Dé, 9A, 38, BF, ED, 43, CA, BF2D 
1799 DATA 99,AF, C9, 2A, C,99, 91,98, 88, AF, ED, Bi, ED, Bi, 22, C8, C78F 
1785 DATA 99,C9, 24, BE, 99, 7E,FE, 80, 28,92, AF, CO, 37, C9, ED, 4B, CFDS 
1718 DATA C9,99, 2A, 37,88, DA, 14, CA, 42,99, B7, 28, 13, FE, 23, 28, D615 
1715 DATA 89,CD,FE, 9B, 77, 23,43, C3, B5, A, 3, C2, 99, C3, C1, SA, DEEG 
1729 DATA 22,37,88,C9,FE, 38,D8,FE,5B, 38, 8A,FE, 41, 98, 84, FE, EEQA 
1725 DATA 34,38,82,AF, C9, 37,9, 21,FE, 9A, 7E,FE, 29, C2, F4, OA, EF23 
1739 DATA 23,03, EA,9A,FE, 9D, CB, 32, 42, 88, 23, C3, EA, 9A, 29, 48, F72E 
1735 DATA 45, 4C, 4C,4F, 28, 6D, 69,0, 09,00, 8,08, 06,08, 06,09, F887 
1748 DATA 99,09,09,09,06,00,08,08,09, 00,09, 00, 09, 69, 09,09, FB87 
1745 DATA 99,99,09,09,09,00,00,00,09,00, 90,08, 09,08, 00,09, F887 
1759 DATA 99,96,08,00,06,00,08,09,09,08, 89,08, 89,90, 80,09, FB87 
1755 DATA 99,09,66,09,00, 89,09, 80,99, 09, 09,09, 09, 09,08, 09, F887 
1769 DATA 99,00,09,00,06,00,08, 00,08, 60, 09,08, 09, 80, 09, 99, FB87 
1765 DATA 99,99,89,09,80,09,00, 09,09, 09, 00,09, 06,09, 08,09, F887 
1779 DATA 99,00,09,08,00,09,08,00,08, 89,98, 89,05, 80,00, 89, FB87 
1775 DATA 99,98, 69,09,60,00, 90, 09,00, 09,00,06, 06,05, 08,99, F887 
1784 DATA 89,90, 09,00,90,08,00,09, 09,09, 09,00, 60, 09, 99, 89, F887 
1785 DATA 89,69,86,08,80,09, 60,00, 90,09,08,06, 08,09, 00,09,FB87 
1799 DATA 9,09, 09,08,06,00,99,08,98, 89,99, 08, 89, 99, 08, 89,FB87 
1795 DATA 86,68,80,09,80,09, 89,09, 09,09, 09,06, 68,09, 00, 09,FB87 
1899 DATA 99,00, 00,00,00,08,09,08,09,00,90,08, 69,89, 89, 09,FB87 
1895 DATA 89,00,89,09,60,00, 00,09, 09,09, 09,09, 69,08, 00,09 ,FB87 
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1819 DATA 09,09,08,09,08,09,09,99,99,09,99,99,88,9,FE, 45, FOCA 

1815 DATA 28,17,FE, 41,28, 13,FE, 4F,28,0F,FE, 49, 28,98, FE, 55, FFD4 

1829 DATA 28,87,F5,AF,32,81,98,F1,C9,F5, 4, 81,98, 87, 29, 11, 883C 

1825 DATA E5, 24, 49,88, 22, 3E, 88, Et, 22, 49, 88, 3C, 32,B1,98, F1, 8F6E 

1834 DATA C9,AF, 32,81,98,F1,C9,21,FE, OA, 7E,FE, 8D, CB, FE, 5C, 197F 

1835 DATA 28,9F,FE,61,38,97,FE, 78, 39,93, D6, 29, 77, 23,C3, 3, 1FBD 
1849 DATA 9C,3E, 26, 77,23, C3, 3A,9C, 89,9E, 8D, A6, 7C, A1, F9, A2, 27C3 

1845 DATA 75,A4,FF, A5, AD, A3, 8E, A3, F4, AG, BA, A5, F2, OD, F2, A6, 331B 
1859 DATA 20,44, 26, A6, 14, 3,36, A1,98,9C,D3, 5,83, AG, AG, A5, 3B5D 

1855 DATA CF, A4, 32, A3, 29,A5,F6,A6, 37,46, 3F, A4, 4A, A4, 74, AG, 43D7 
1868 DATA 4F,55,53, 29,98,55,55, 33,53, 68, 4F,43, 41,99, 4F, 57, 4707 

1865 DATA 32,4B,41,48,80,4F,43,4F, 29,09, 4F,57,4B,4F,57,09, 4835 
1878 DATA 4F,43,4F,99,4F,57, 48,08, 4F, 43,55,00,4F,57,4B,55, 4F34 

1875 DATA 55,99,4F,51,55,89,4F,57,4B,99,4F,58,55, 09, 4F, 4F, 5309 
1889 DATA 4B,53,55,55, 98, 4F, 23,55, 08, 4F,57, 33,23, 80,4F,55, S6BB 
1885 DATA 47,48, 29,08, 4F,48,33,57,88,4F, 47,59, 08, 4F, 4A, 45, 5AS5 
1899 DATA 45,98, 4F,55,47,48,99,41,48,00,4F,4C, 45,29, 09, 4F, SDAS 

1895 DATA 57,32, 4C,08,4F,45,80,4F,57,33,99,4F,55, 4C, 44, 28,613B 
1999 DATA 99,55, 48,33, 44,99, 4F,58,4F, 89, 4F, 4F,4B,53, 4F,57,6527 
1995 DATA 99,4F,23,4F,28,80,4F,57,23,4F, 57,09, 4F, 23, 4F, 99, 6838 
1918 DATA 4F,57, 32, 23,08, 4F,58,41,08,4F,4F, 48,53, 41,45, 99, 6BDD 
1915 DATA 4F,23,41,08,4F,57, 32,23,80,4F,43,45,08,4F,57,53,6F5B 
1929 DATA 48,98, 4F,58, 45,08, 4F,4F, 48,53, 08, 4F, 23, 45,99, 4F, 72D1 
1925 DATA 57,33, 23,08, 4F,4F,4B, 00,55, 48, 33, 4B, 00, 4F,55, 48, 7626 
1938 DATA 41,45, 32,55,58,08,4F,55,52, 89,41, 4F, 33,52, 99, 4F, 79E5 
1935 DATA 49,43,89,4F,59,53,99,4F, 29,99, 4F,57,00,4F,41,99,7D11 
1949 DATA 4F,48,33,57,08,4F,52,45, 28,08, 41,4F, 32, 52,99, 4F, B89B 
1945 DATA 57,98,4F,57,98,4F,52, 49,88, 41, 4F,52, 49,58, 32,09, 8437 
1958 DATA 4F,4F,09,55,58, 08, 4F,52,08,41,4F,52, 08, 4F, 48, 89, B79C 
1955 DATA 4F,48,88,4F,4F,52, 80,41, 4F, 33, 52,09, 4F, 49, 08, 4F,GB1F 
1968 DATA 59,33, 08,4F,59, 68, 4F,59, 88, 4F,54, 48, 45,52, 99, 41, BEBE 
1965 DATA 48,44, 48,45,52, 98, 4F,52, 52,08, 4F,52, 04, 4F, 08, 4F, 0258 
1978 DATA 4F,08, 49,43, 45, 08, 49,50, 53, 08, 49, 43,50, 99, 49, 50, 95F7 
1975 DATA 53,45,45,34,80,49,58,59, 49, 49, 48, 4B, 53,45, 45, 48, O0BB 
1989 DATA 49,23,59,98, 49,59, 23,45, 45,8, 49,52, 4F, f9, 49,59, QD5B 
1985 DATA 52,4F,4F, 09, 49,59, 99, 49,59, 09, 49,54, 4C, 45, 68, 49, A106 
1998 DATA 59,54,55,55,4C,98, 49,45, 44,8, 41,59, 33, 44, 99, 49, A4DS 
1995 DATA 58,45,88, 49, 48, 48,53, 09, 49, 23, 45,98, 49,59, 33, 23, AB4A 
2888 DATA 99, 49,45,08,45, 45,08, 49,47, 49,89, 49,58, 32, 44, 49, ABA 
2005 DATA 48,80, 49, 20,86, 49,59, 34,08, 49,53, 4D, 99, 49,58, 33, AEES 
2918 DATA 53,55,55, 40,98, 49, 47, 48,9, 49,59, 32, 69, 49, 52, 89, B276 
2915 DATA 45,52, 34, 80,49, 40, 49, 48,89, 28, 44,41,56, 49, 44, 29, B5C3 
2829 DATA 99,29, 44,41,59,56, 49, 48, 44, 68, 29,59, 53, 59, 89, 29, B928 
2825 DATA 53,49;59, 89,28, 47, 49,56, 45,99, 29,47, 49, 48,56, 89, BCB6 
2838 DATA 29,59, 4F,55,52, 29,98, 29,59, 41, 4F,52, 9, 29, 43, 48, CO4B 
2835 DATA 41,49,52, 29,89, 29,43, 48,41, 49,52, 98, 29,57, 48,59, C3E6 
2849 DATA 29,06, 29,57, 49,59, 98, 29,45, 28,88, 29,45, 45,96, 28, CGGE 
2845 DATA 23,45,52, 45,88, 28, 23, 45,45, 33,45, 52,08, 28, 4F,55, CQC8 
2858 DATA 47,48,54, 08,28, 41, 4F, 32,54, 88,29, 43, 4F,55, 47, 4B,CD77 
2855 DATA 29,68,28,4B,4F,4F, 46,89, 29, 23,4F,55, 47,48, 28,9, DATC 
2968 DATA 29,23,41,48,46,98, 28,53, 43, 49,80, 29,53, 49,59, 99, D3A2 
2665 DATA 28,59,45,53, 29,09, 29,59, 45, 48, 33,53, 98, 25, 23, 49, DGEB 
2978 DATA 45,99, 28,23, 49,59, 98, 29, 41, 42, 4C, 45,88, 29, 41,59, DA93 
2975 DATA 33,42, 4C, 99,29, 47,45,54, 08, 28, 47,45, 48,54, 08, 29, DD2C 
2888 DATA 41,4E,59, 98,28, 45,48, 32, 4E, 45, 45,88, 28,55, 23, 45, EGAB 
2985 DATA 68,29,59,55,58,57, 23,99, 28,4F,55,52, 98, 29, 41,57,E416 
2898 DATA 33,52,08,29,4F,4E, 45,08, 28,57, 4F,4F,4E, 88, 29,54, E774 
2895 DATA 4F,29,8, 29,54,55,58, 33, 98, 29, 42, 45, 29,99, 28, 42, EAGS 
2188 DATA 45,45,33,09,28, 4F,46, 28,88, 28, 4F, 4F, 33,56, 88, 29, ED5Q 





2185 DATA #1,29,99,29,41,45,88, 29,41,52,45,28,06,29,41,41,FA1A 
2118 DATA 33,52, 08, 29,57, 4F,52,98,28,57,45,52, 33,80, 29, 4D,F365 
2115 DATA 45, 29,98, 28, 4D, 45,45, 33,08, 28, 47,49, 09, 29, 4A, 49, F657 
2129 DATA 59,99, 29, 4D, 59, 28, 68, 28, 4D, 49,59, 89, 28, 49,53, 28, F981 
2125 DATA 98,29, 49,58, 34,53, 98, 29,53, 43, 88,29, 53, 4B, 0, 28, FC5D 
2138 DATA 41,53, 29,08, 29, 41,45,53,8, 28,57,49,54, 48, 29,09, FF86 
2135 DATA 29,57,49,58,33, 44, 48,08, 29,48, 41,56, 45, 29, 08, 29, 02E1 
2149 DATA 2F,48,41,45, 33,56, 68, 29, 42,59, 29, 09, 28, 42, 49, 59, 9646 
2145 DATA 31,88,28,54,48, 49,53, 29,09, 28, 44,48, 49,58, 53, 09, 298F 
2158 DATA 29,57, 45, 29,98, 29,57,45,45, 33,08, 29,54, 48, 45,59, ACF9 
2155 DATA 29,80,28, 44,48, 41,59, 32, 08, 29, 48,41, 53, 29, 08, 29, DFCD 
2168 DATA 2F,48,41,45,53, 08, 28,54, 48, 45, 49,52, 29,5, 28, 44, 1330 
2165 DATA 48,41,49, 32,52, 09, 29,54, 48, 41, 4E, 29, 08, 29, 44, 48, 1GAA 
2179 DATA 41,45,34,4E, 99,28, 4F,4E, 4C, 59, 29,89, 28, 4F,57, 33, 1A2D 
2175 DATA 4€, 4C, 45,45, 08, 29,59, 45, 4F, 99, 29,58, 45,45, 32,98, 1D81 
2188 DATA 29,53,48,45, 29,08, 29,53,48, 45,45, 33, 88, 29,53, 41, 20CD 
2185 DATA 49,44, 28,89, 20,53,41,49, 34, 44,80,29,53,4F, 4D, 45, 2443 
2198 DATA 29,08, 29,53, 41, 48,33, 4D, 08, 28,54, 48, 45, 4E, 29,89, 274E 
2195 DATA 28,44,48,45,48,33, 4E, 98, 28, 4D, 45,29, 09, 29, 4D, 45, 2ABC 
2289 DATA 45,99, 29,47, 4F,54, 4F, 29,08, 29,47,4F,57,54,55,57, 2E57 
2295 DATA 69,29, 4D,4F,53,54, 29,09, 29, 4D, 4F,57, 32,53,54,98, 31C6 
2218 DATA 29,09, 29,08, 47,54, 48,29, 08,54, 48,8, 47, 48, 4F, 54, 34D7 
2215 DATA 49,90, 46, 49,48, 34,53,48,98,47,55, 45, 29,08, 47,09, 380E 
2228 DATA 47,4F,4F,08,47,55, 48, 32,08, 47,45, 4E, 88, 4A, 45, 48, 3BBA 
2225 DATA 33,4E, 08, 47,48, 4F,89, 47, 4F, 48, 32,57, 68, 47, 47,08, 3F0E 
2239 DATA 47,90,47,08,47,08,4E, 47,45,52, 8, 4E,58, 47, 45, 52, 4293 
2235 DATA 98,4E, 47,53, 28,80, 4E,58, SA, 08, 4€, 4F, 57,98, 4E, 41, 461E 
2249 DATA 57,00,4E,47,45,08,4E, 4A, 08, 4E, 49, 4F, 4E, BD, 4E, 49, 49B2 
2245 DATA 58,55,55, 4E, 89, 4€, 4E, 09, 4E, 89, dE, 47, 29,08, 4E,58, 4D47 
2258 DATA 09, 4€, 47,08, 46,58, 47,00, 4E,68,4E, 09, 41, 47, 45, 29, 5052 
2255 DATA 68,41,59,4A,80,41,55,47,48,09, 41,41, 33,46, 08, 41, 5307 
2269 DATA 49,47,48,08,41,59, 98, 41,42, 4C, 45,89, 41, 48, 42,55, 573D 
2265 DATA 55,4C,08,41,43,49,40,41,45,53, 49,48, 8,41,58, 49, SAF7 
2278 DATA 09,41,45,4B,53, 49, 48,99, 41,23, 49,8, 41,59, 33, 23, 5E49 
2275 DATA 99,41,52, 45,88, 41,49, 33,52, 99, 41,29,08,41,48,08,611A 
2289 DATA 41,46, 47,45, 29,08, 41,59, 30, 4E, 44,09, 41, 4E, 47, 45, 64D4 
2285 DATA 49,41,59,32,4E, 44,55,55, 80, 41, 4C, 4C, 59,08, 41, 45, GBOA 
2299 DATA 32,4C,45,45,98,41,58,41,08, 41,45, 48,53, 41, 45, 9, 6C26 
2295 DATA 41,43,41,80,41,45,4B, 41,45, 98, 41,2, 41, 08, 41,60, EFBi 
2399 DATA 23,80,41,43,45,08, 41,59,53, 88, 41,58, 45,89, 41, 45, 72BE 
2385 DATA 4B,53,98, 41,23, 45,09, 41,59, 34, 23,08, 41, 43,59, 89, 75D3 
2318 DATA 41,59,53,45,45, 08, 41,43, 48,80, 41,45, 43, 48, 95, 41, 7968 
2315 DATA 43,4B,08, 41,45, 4B,89, 41, 43,43, 09,41, 45, 4B, 6,41, 7CAB 
2328 DATA 43,99, 41,45,4B,08,41,58, 4F, D, 41,45, 4B, 53, 4F, 57, 8966 
2325 DATA 98,41,23,4F,80,41,59,23,80,41,55,08, 41, 4F, 33, 08, 832F 
2338 DATA 41,56, 49, 68, 41,59, 32,56, 49,58, 49, 41, AC, 4B, 98, 41, BGEB 
2335 DATA 4F,52,4B,80,41,52,80,41,41,33, 08,41, 46,08, 41, 41, 8A28 
2348 DATA 32,46,08,41,5A,59,98, 41,59, 33, SA, 45, 45, 88, 41, 4C, BDD2 
2345 DATA 4C,88,41,4F,32,4C,80,41,58,59, 85,41, 45, 4B, 53, 45,9187 
2358 DATA 45,99, 41,23,59, 98, 41, 49, 49,58, 23, 45,45, 88, 41,57, 94F9 
2355 DATA 98,41,57,40,41,49,80, 41,50, 32, 89, 41, 49,52, 88, 41, 9894 
2368 DATA 49,52, 98, 41,59,88,41,59, 68, 41,52, 28, 89, 41, 41, 33, 9B3B 
2365 DATA 52,88,41,52,52,88, 41,45, 33,52, 88,41, 09,41, 45, 98, OE44 
2378 DATA 42,42, 43,08, 42,45,45,25,25, 42, 45,45, 25,53, 45, 45, ALEF 
2375 DATA 48,42, 42,80, 42,90, 42, 45,59, 29, 68, 42, 45, 45,59, 98, AGDA 
2388 DATA 42,86, 42,88, 4D, 49, 43,52, 4F, 98, 4D, 49,59, 33, 4B, 52, AB97 
2385 DATA 4F,57,98, 4D, 42, 29,89, 4D, 68, 4D, 4D, 58, 4D, 98, 4D, 88, ABGD 
2398 DATA 4D,86,54,57,4F,68,54,55,57,8,54, 48,52, 45, 45, 08, AF2C 
2395 DATA 54,48,52,45,45,89,54,43, 48, 98, 43, 48, 8,54, 4C, 45, B2F3 
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2498 DATA 89,54, 4C,98,54,55, 23, 45,08, 43,48,55, 57,23, 09,54, B652 
2495 DATA 49,4F, 09,53, 48,41,48,00,54, 49,41,98,53,48, 49,58, BA28 
2418 DATA 55,55,96,54,48,45, 28,08, 44, 48,55,55, 25,29, 49,54, BDA2 
2415 DATA 48,99,54, 48,99,54,54,09,54,08,54,09,54,08, 46, 4F,COBF 
2428 DATA 55,52, 99,46, 41, 4F, 33, 52,08, 46, 4F,4F,54,89, 46,55, C494 
2425 DATA 48,32,54,86,46,46, 86,46, 09, 46, 95,46, 09,45, 49, 47,C795 
2438 DATA 48,54,99,41,59,54,45, 68,45, 52,59, 29,09, 45, 48, 32, CB33 
2435 DATA 52,45,45,88,45,52,52, 09,45, 48, 32,52, 08,45,53, 28, CECI 
2449 DATA 99,53,99,45,46,55, 4C, 29,08, 46,55,55, 4C, 98, 45, 41, D222 
2445 DATA 53,45,28,46,45,45,5A, 49,45, 28, 86,25, 09,45,57,89,D4E4 
2458 DATA 49,48,55,57,96,45,55, 08, 49, 48,55, 48, 32, 89, 45, 45, DBAS 
2455 DATA 86,45,45, 34,99, 45, 52,45, 9, 41, 49,52, 09, 45,52, 99, DBB2 
2468 DATA 45,52, 99, 45,59, 98, 41,59,08, 45, 41,98, 45,45, 33,89, DEC4 
2465 DATA 45,44, 29,09, 25, 44,89, 45,98, 45, 48,09, 4B,4E, 00, 4E,E18F 
2478 DATA 99,48, 45,59, 28, 08, 4B,45,45,59, 68, 48,08, 4B, 49,56, E4B4 
2475 DATA 43,08, 4B,53,80,58, 89, 48,53, 08,59, 53, 09, 49, 48, 32, E7FA 
2488 DATA 53,98,59,58, 45,08, 49,59, 32,58, 98,59, 45, 29, 85, 49, EBG6 
2485 DATA 59,99,59, 28,96,45,45,99,59,4F,55,29,08,59,55,57,EEE4 
2498 DATA 89,59, 99,59, 99, 43,48, 4E, 9, 4B, 4E, 80,43, 49, 99,53, F1E7 
2495 DATA 49,48,89,43, 48,52, 88, 4B,52, 98,43, 4F, 4D,45, 29,08, F536 
2588 DATA 4B,41,48,4D,99,43,4F,57,88, 48, 41,57, 43, 45, 29, FBCB 
2585 DATA 99,53,80,43,45,09,53, 45,48, 32, 89, 43, 48,09, 43, 48, FRCE 
2518 DATA 99,43, 43,09, 4B, 68,43, 48,09, 4B, 09, 43,58, 43, 99,53, FEAI 
2515 DATA 45,45,29,58,45,45, 29,53, 45,45, 99,43, 09, 4B, 69,53, 0293 
2529 DATA 55,58, 45,52, 49, 4F,52,98,53,55,58, 32,58, 45, 45, 33, 9668 
2525 DATA 52,49, 48, 41,4F,52, 08,53, 48, 41, 4C, 4C, 08,53, 48, 41, A7D 
2538 DATA 45,4C,99,53,54, 49, 4F, 4E, 09,53, 25,43,48,55,55, 4E, JE96 
2535 DATA 98,53,45,53,28,00,53, 49,58, A, 08,53, 53,98,53,08, 11E8 
2548 DATA 53,49, 4F,09,5A,48,55,55, 09,53, 48, 80,53,48, 99,53, 15AB 
2545 DATA 43,98,53, 4B,99,53,80,53,08,55, 45, 28, 98,55, 57, 36, 18CB 
2558 DATA 99,55,52,45, 28, 08,55, 48, 33,52, 88,55, 59,98, 49, 59, 1C49 
2555 DATA 33,49,55,43,45,80,55,57,53,89,55, 23, 45,98,59,55, 1FC3 
2568 DATA 57,33, 23,09,55, 23, 41,99,55,58,57,23, 09,55, 43, 49, 2331 
2565 DATA 96,55,57,53,49, 48,88, 55, 23, 49, 89,59, 55,58, 57, 23, 2792 
2578 DATA 99,55, 4C,4C,98,55, 48, 33, 4C, 80,55, 48, 98,55, 48, 09, 2A45 
2575 DATA 55,4C,28,40,55,55,4C,49,55, 41, 4C,08,59,55,55, 4C, 2E2D 
2588 DATA 86,55,52, 99, 45,52, 33,52, 08,55, 52,52, 80,41, 48,52, 31C4 
2585 DATA 89,55,98,41,48,09,52, 45, 41,54, 90,52, 41,59, 33,54, 3541 
2598 DATA 99,52,52, 68,52, 98,52,98,52, 90,48, 4F,57,89, 2F, 46, 3849 
2595 DATA 41,57, 32,98, 48,45, 29,89, 2F,48, 45,45, 34,08, 48,09, 3B34 
2688 DATA 2F,48, 09,58, 4F,57,08,58, 41,57, 33,09, 50,52, 4F, 47, 3EF4 
2695 DATA 99,59,52, 4F,57, 32,47,98,50,48, 06,46, 09,58,58, 0, 4233 
2618 DATA 59,99,58, 4C, 59,98, 55, 4C, 49,59, 89,58, 4,58, 99, 44, 459A 
2615 DATA 4F,57,98, 44, 41,57, 32,89, 44, 4F, 26,08, 44,55, 48,34, 4916 
2628 DATA 57,99,44,47,08,4A,09,44,48,08, 44,48, 89, 44, 44, 89, 4BE2 
2625 DATA 44,88,44,08, 44,99, 4C, 45, 29,08, 55,55, 4C, 04, 4C, C, 4EED 
2638 DATA 49, 4C, 08, 4C, 08, 4C, 80,57, 48, 4F, 80, 2F, 48,55, 48,57, 522A 
2635 DATA 68,57,41,53,20,09,57,4F,4F,5A, 80,57, 48,41, 08,57, 55EB 
2648 DATA 4F,4F,33,98,57,41,54,08,57,41,4F, 34,54, 80,57, 48, 5086 
2645 DATA 98,57,98,57,52,98,52,08,57,4F,4F,99,57,55, 48,49, 5CC1 
2658 DATA 57,99,57,09,5A,5A,68,5A,98,5A, 46,88, 5A, 48, 89, 5A,681B 
2655 DATA 98,54,98,51,55,96, 4B,57,40,51, 40, 4B, 99,38, 08, SA, 62E3 
2668 DATA 49, 48,35,52,4F,57, 32, 28,08, 31,89,57,4F, 4F, 33, 4E, 66QA 
2665 DATA 28,89, 32,09,54,55, 48, 32, 57, 29,09, 33, 08,54, 48,52, 6947 
2678 DATA 45,45, 33, 29,08, 34,89, 46, 41, 4F, 33,52, 29, 80, 35, 89, EC68 
2675 DATA 46,49,59, 33,56, 28, 80,36, 80,53, 49, 48, 34, 48,53, 29, 7805 
2688 DATA 88,37,08,53,45,48,33,56,55,55, 4E, 29,89, 38, 98, 41, 7336 
2685 DATA 59,33,54, 28, 89,39, 89, 4E, 49, 59, 33, 4E, 28, 09, 23, 89, 7623 
2698 DATA 23,99, 44,98, 44,08,56,08,56,98,09,60,69, 40,68, 89, 77E6 
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POUSAX 


Claude LE MOULLEC 


Valable pour CPC 464 - 664 - 6128 





Ce jeu est prenant et 
passionnant. Dommage 
que je ne sois pas 
l'inventeur du concept. 
Je pense que vous 
n'aurez aucun mal à 
découvrir la source de 
mon inspiration. 
J'espère pourtant que 
ma modeste version 
vous plaira. 

Pour vous, j'ai conçu 24 
tableaux qui sont autant 
d'énigmes. Je ne doute 
pas que vous réussirez à 
les résoudre. 








orsque cela sera fait, pourquoi 
L ne pas créer vos propres ta- 
bleaux ? 
Rien de plus simple : il suffit de rem- 
placer quelques DATA en fin de lis- 
ting par les vôtres. 


Le jeu se déroule dans une matrice 
de 13 cases sur 12 lignes. Pour cha- 
que tableau, il y a 4 lignes de DATA, 
chacune contenant 3 séries de ca- 
ractères. Chaque caractère corres- 
pondant à une case du tableau. 
Voici la correspondance pour cha- 
que caractère : 

X pour les cases non utilisées. 

A pour les murs de l'entourage. 

1 pour les murs à l'intérieur de l'aire 
de jeu. 

0 pour les cases vides (noires) 

2 à 9 pour les cubes du jeu. 


Reste maintenant la dernière ligne 
de Data. Suivant les cas, il y a 2 ou 
5 données. Le premier nombre est 
toujours égal au nombre de cubes 
qu'il y a dans le tableau. 


La deuxième valeur est soit O soit 1. 
O0 = pas d'ascenseur dans ce ta- 
bleau et les données s'arrêtent là. 
En revanche si la valeur est 1, les 
données 3 et 4 correspondent à la 
position X.Y de l'ascenseur dans la 
matrice 13x12. La dernière donnée, 
la cinquième, correspond à la haur- 
teur maximum à laquelle peut 
s'élever l'ascenseur. 


Voila, vous connaissez le principal. 


Admettons que vos datas aient pris 
la place de ceux du tableau numé- 
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ro 10. Pour faire un test rapide de 
votre travail, remplacez dans le 
sous-programme VARIABLES DE BASE 
la valeur TA=1 par TA=10. Le jeu dé- 
butera automatiquement par le ta- 
bleau 10. 


Un dernier conseil : le temps est limi- 
té, pensez donc à réduire le nom- 
bre de cubes à faire disparaitre. 
Recherchez les combinaisons né- 
cessitant de l'astuce plutôt que de 
nombreux déplacements. Le ta- 
bleau 18 est un bon exemple. Bon 
courage. 


3 fichiers constituent ce jeu : 
POUSNIK.BAS fichier basic, corps pri- 
cipal du jeu. 

DATAPOUS.BAS fichier basic, qui, 
une fois lancé, créé le fichier POUS- 
BIN contenant les sprites et les routi- 
nes LM. 


Ce jeu est compatible avec toutes 
les configurations. Pour les 464 sans 
drive, il faudra que le fichier POUS- 
BIN se trouve à la suite du fichier 
POUSNIK sur la K7. 











270 SYHBOL 287,15,252, 128,8, 192,224, 253,195 JR 


TNT ES 289 SYMBOL 296, 248,0,8,0,0,6,6, 128 >AD 
299 SYMBOL 289, 124, 249,8,9,9,8,9,9 DAL 
389 SYMBOL 219,231, 223,0,9,,6,9,0 )ZT 
LUCREN, diseases )YQ 319 SYMBOL 211,63,255,9,9,8,0,9,9 >2P 
29 REM : : DEA | 32 SYMBOL 212,192, 192,8,9,9,0,9,0 >AA 
38 REM : POUSNIK DC | 339 SYMBOL 213,254, 188,94, 47, 255,255, 126, 192 XKE 
48 REM : : DEC | 349 SYMBOL 214,254, 252, 39,15, 255,193,9,8 >FB 
59 REM : CLAUDE LE MOULLEC : DWJ | 359 MEMORY 49849:LOAD "POUSBIN", 49899 DEE 
69 REN : : )EE 368 REM sssesssseseneeneenees: >YH 
78 REM : 83 RUE JOLIOT CURIE : DXR | 379 REX : : )LC 
89 REM : : DEG | 389 REM : VARIABLES DE BASE : x 
98 REM : 22428 PLOUARET : TZ | 399 REX : : )LE 
199 REM : ! >KD 489 REM sosssesesenesesesenten | )YC 
LS REM : TEL 96 38 94 24 : DR | 419 DEFINT a-y:CALL SBBFF:MODE 9:BORDER # »IC 
128 REM : KF | 429 RESTORE 438:FOR h:ÿ TO 15:READ a: INK h,a:NEXT >RD 
198 REM sestsssssesessssseneese )YC 439 DATA 9,24,15,5,3,22,14,7,16,9,13,24,18,23,26,6 >PB 
148 REM : : DKH | 449 DEF FN zt(x,y)=8C000+(y-1)x89+(x-1)#2 >GP 
159 REM :  REDEFINITION : DUA | 459 IF present=1 THEN 519 )TL 
169 REM : : KK | 469 A$="AMI=VEUX TU VOIR LA PRESENTATION ?":2L-3:YL:11: )ZR 
179 REN gosresssseseseneeseense )YG CER=3:GOSUB 949 
189 SYMBOL AFTER 169 DPI À 47 A8="< OUI <<< NON <":ZL=12:YL=13:CER=8:GOSUB 949  DXT 
199 SYMBOL 179,179, 178,179, 178,179,179,179,179 )HL 488 A$=INKEYS: IF A$="" THEN 489 sXG 
269 SYNBOL 171,9, 84,84, 84,84, 84,84,9 DCT | 49g A$-UPPERS(AS):IF At="0" THEN 3159 >CV 
219 SYHBOL 281,9,8,9,0,1,1,9,1 DH | 598 1F A$="N" THEN CLS:GOTO 519 ELSE 488 DEP 
228 SYMBOL 292, 14,31,123,245, 226,255, 127, 183 KM | 519 INK 7,7,18:tr$=CHR$(22)4CHR$(1) snr$=CHRS(22)4CHR$ (D DAM 
230 SYMBOL 283, 128, 224, 192, 224, 252, 255,255, 224 HV ) 
249 SYMBOL 204,9,9,9,58,239, 255,254, 188 'EB | 52ÿ ali3$=CHR$(299)+CHR$(219)+CHR$(211)+CHR$ (212) >RQ 
259 SYHBOL 285,3,3,1,9,1,3, 15,62 DIN | 538 ali2$-CHRS(295)+CHR$ (206) +CHR$ (287) +CHRS (298) >RC 
268 SYMBOL 296,198,113, 191,228, 179,119, 127,248 >HC 549 alit$=CHR$(291)+CHR$ (292) +CHR$ (293) +CHR$ (284) >RK 


(CIECHRLO])\ EST NOT NIET EN SE 227: 


LA GESTION DE COMPTE BANCAIRE INDISPENSABLE POUR VOTRE CPC 


SELECTION MODIFIER RELEVES 





Quelques caractéristiques _: 


- Gère jusqu'à 10 comptes (banque, épargne, caisse...) 
- Codes secrets possibles pour chacun des comptes. 
- Saisie des opérations très simple, avec aide en ligne. 


D ré 


- Fonction archivage, vous permettant de stocker année par année DAUE (HE 
vos opérations, H DEA su . Fee 
- Fonction TRIER, pour obtenir des listes d'opérations par dates De 1002 POUR ANNE 


: 10003 RÉSURANCE AUTO 
croissantes. 


- À l'aide de POINTER, vous pouvez effectuer la liaison avec votre 

relevé de banque ‘officiel’. >< 
- NOMBREUSES POSSIBILITES DE SORTIES : à BON DE COMMANDE à retourner à 

- Recherche particulière répondant à 1 ou plusieurs critères ! MICROLOGIC - B.P. 18 - 91211 DRAVEIL CEDEX 








parmi les suivants : -DATES DE DEBUT ET DE FIN i par téléphone:(1) 69.21.61.65 / par minitel (1) 69.24.49.08 
-MONTANTS MINIMUM ET MAXIMUM ; 
-UN LIBELLE PARTICULIER NO En Een PrÉhOm anne 
- Liste de chèques pouvant répondre aux critères suivants: ARNO Rene mr AN NS 
-DATES DE DEBUT ET DE FIN : Code postal... Villers nn sante ca cod ren 
-NUMEROS DE DEBUT ET DE FIN. De commande GESTION BANCAIRE 6128 , au prix 
- Relevé complet -ENTRE DATES ! de 265,00 Frs. (port compris) 
-AFFICHAGE SOLDE REEL OU SOLDE DJ désire recevoir votre CATALOGUE GRATUIT 
OPERATIONS POINTEES. présentant votre autres produits pour CPC. 
- Sorties sur ECRAN , IMPRIMANTE ou DISQUETIE. i Je choisis de régler par :_ Expire 
- UTILITAIRES IMPRIMANTE, ECRAN, COPIE D'ECRAN... Ne CHEQUE CB. | Qu NO a FÎN 


Signature 


- UTILISE LES 128 Ko DE VOTRE CPC 6128. 47! [] MANDAT [7] CONTRE RBT (+35 Frs) 


0 





& 








ol 


| 
| 
| 


| 
| 
| 








559 DIM sp(29):FOR H=9 TO 18:SP(H+1)=49899+ (Hx64) :NEXT: >NX 
SP(29)=kA499 





569 ENV 3,5, -2,1ÿ >DH 
578 DIM je(13,12):vie=5:ta=1 >NG 
588 SC:9:POKE &A939,298:GOT0 739 >ZK 
59ÿ REM :sssssstsseessenesenst )ZE 
689 REX : XKJ 
619 REM : DECOR DE BASE )RU 
629 REX : LA 
639 REM :sssrssessseseseeeset >YH 
649 FOR H=9 TO 28:CALL &A932, LCHQO+H:CALL 8&A932,8C936-H >DH 
:NEXT 

659 DEF FN polx,y)=&C998+(y-1)#249+(x-1)#6:POKE LAGLA,2 DPV 
4:POKE &AŸ1E,6 

669 FOR h=1 TO 9:FOR g=1 TO 8 )VA 
674 CALL &A99D,FN po(h, g),sp(16) )ZR 
689 NEXT g,h:POKE &ABIA,16:POKE &ABIE, 4 >FM 
699 PLOT 459,398, 3:DRAVN 468, 309:DRAW 464, 18:DRAW 458,19 >NB 
:DRAU 459,398 

789 PLOT 454,388,11:DRAN 454,12:PLOT 458, 388:DRAU 458,1 D2T 
2 

719 PLOT 454,129,15:DRAN 454,12:PLOT 458,129:DRAW 458,1 >HC 
2:tp=399 

729 RETURN )2E 
739 PLOT -19,-19,11:TAG:MOVE 498, 368:PRINT alit$;:MOVE >DX 
498, 352:PRINT ali2$: :MOVE 498,336:PRINT ali3$;:TAGOFF 

749 DATA 16,1,5,16,5,5,16,8,5,16,19,5,16,13,5,16,15,5,1 DAL 
8,18 

759 DATA 3,18,28,3, 16,22, 3,16, 24,3,16,1,5,28,1,5,16,8,3 )ZA 
, 28 

769 DATA 8,3,16, 13,3, 29, 13,3, 18,18, 3,28, 18,3, 16,22,3,18 DBE 


, 22,3 
719 e1=19:e2=6:RESTORE 749:FOR i=1 TO 29:GOSUB 7B8Y:NEXT KZ 
:G0TO 868 


789 READ X,Y,L:x1=14+(X-1)#32:y1=388-(Y-1)#16 >MU 
798 IF i>19 THEN 839 >MU 
889 FOR J:9 TO 2 STEP 2:PLOT x1,yi+j,e1:DRAW xt+(1-1)#3 DMX 
2,y1+j:NEXT 

819 FOR J=4 T0 6 STEP 2:PLOT x1,y1+j,e2:DRAW x1+(1-1)x3 >MH 
2,y1+j:NEXT 

829 RETURN >)2F 
838 PLOT x1+4,y1+2,e1:DRAW x1+4,y1+2-(1-1)#16 )HA 
849 PLOT x1,y1+2,e2:DRAN xi,y1+2-(1-1)416 HU 
859 RETURN )2J 


869 LOCATE 1,1:PRINT tr$:RESTORE 878:FOR h=1 TO 28:G0SU ZX 
B 899:NEXT:GOTO 919 

879 DATA 16,1,16,5,28,1,29,5,16,8,28,8,16,19,28,18,16,1 >DK 
3,28,13 

889 DATA 16,15,29,15,18, 18,28, 18,18,28,28,28,16,22,18,2 )LC 
2,16,24,18,24 

899 READ x,y:PEN 9:LOCATE x,y:PRINT CHR$(179):PEN 12:L0 DKX 
CATE x,y 

989 PRINT CHR$(171) :RETURN NT 
919 LOCATE 1,1:PRINT nr$:RESTORE 939 )EA 
929 FOR h:1 TO 9:READ ZL, YL,mo,a$:GOSUB 948:NEXT:GOSUB TP 
3669:G0T0 1939 

939 DATA 32,9,9, "#89998",32,11,1, "SCORE", 32, 14,9, "99809 22 
9",36,19,9,"90",32,23, 8, "90", 36, 23, 1, "tab", 38,19,8, "VIE 
",38,6,1,"ALI GATOR",32, 16,8, "RECORD" 


48 


949 A$=UPPERS(A$):FOR T=1 TO LEN(A$):SP=(ASC(MIDS(A$,T, 2HC 
1)))-48 

959 1F SP<4 OR SP>43 THEN SP=43 )YC 
968 CALL &9D29,FN zT(ZL, YL)+(Tx2)+M0, &9D49+(SP#16):NEXT AE 


978 RETURN )AB 
988 REM ssssesssseneesenesessee )2L 
998 REM : DMF 
1989 REM : BRANCHEMENT TAB 74 
1819 REM : )RB 
1929 REM srssosseneeneneeseneses >2C 


1938 GOSUB 649:0N ta GOTO 1949, 1959, 1069, 1979, 1989, 1899 
,1199,1119,1129,1139,1149, 1159, 1169, 1179, 1189, 1199, 1299 
,1219,1228, 1239, 1249, 1259, 1268, 1279, 1289 


)CR 


1949 RESTORE 3888:GO0SUB 1349:GO0T0 1548 >FP 
1859 RESTORE 3949:GOSUB 1349:G0T0 1548 FM 
1969 RESTORE 4899:GOSUB 1349:G0T0 1548 )FA 
1978 RESTORE 4969:GOSUB 1349:G0T0 1548 >FH 
1989 RESTORE 4129:GOSUB 1349:GO0T0 1548 FF 
1998 RESTORE 4189:GO0SUB 1349:G0T0 1548 FN 
1199 RESTORE 4248:GO0SUB 1349:GOT0 1548 >FB 
1119 RESTORE 4389:GOSUB 1348:GOT0 1548 )FZ 
1129 RESTORE 4369:GOSUB 1349:G0T0 1549 >FG 
1138 RESTORE 4429:GO0SUB 1349:GOT0 1548 FE 
1149 RESTORE 4489:GOSUB 1349:G0T0 1549 )FM 
1159 RESTORE 4549:GOSUB 1349:GOT0 1548 DFK 
1169 RESTORE 4690:GOSUB 1349:GO0T0 1549 >FH 
1179 RESTORE 4669:GO0SUB 1349:GOT0 1549 >FQ 
1189 RESTORE 4729:GOSUB 1349:G0T0 1548 >FN 
1198 RESTORE 4789:GOSUB 1349:GOT0 1549 >FW 
1299 RESTORE 4849:GOSUB 1349:GO0T0 1548 )FJ 
1218 RESTORE 4999:GOSUB 1349:GO0T0 1549 )FG 
1229 RESTORE 4969:GOSUB 1349:GO0T0 1548 >FP 
1239 RESTORE 5929:GOSUB 1349:GO0T0 1549 DFC 
1248 RESTORE 5989:GO0SUB 1349:G0T0 1548 >FK 
1258 RESTORE 5149:GOSUB 1349:G0T0 154 )FH 
1269 RESTORE 5299:GOSUB 1349:G0T0 1549 >FF 
1278 RESTORE 5269:GOSUB 1349:G0T0 154 FN 
1289 A$="90":2L:32:YL:23:GOSUB 949:TA={:GOTO 1938 TE 
1298 REM sesssssseseeseessecnece >ZM 
1389 REM : RD 
1319 REM : DESSIN TABLEAU DVZ 
1328 REM : >RF 
1338 REM sitsstsssssensenseness 26 
1349 POKE &AS28,9:ERASE je:DIM je(13, 12) >GG 
1359 DEF FN polx,y)=4D#81+(y-1)#168+(x-1)#4 )JD 
1369 FOR h=1 TO 12:READ a$:FOR g=1 TO 13 EC 
1378 b$=MID$(a$,g,1) )NR 
1389 IF b$="X" THEN JE(G,H)=29:G0T0 1429 )FZ 


1398 IF b$="A" THEN JE(G,H)=28:CALL &AG9D,FN PO(G,H),SP 
(2):G0T0 1428 


NG 


1498 B=VAL(B$):CALL &ASBD,FN PO(G,H),SP(B+1) )LY 
1419 JE(G,H)=B >G 
1428 NEXT G,H KB 
1438 X=INT(RND*13)+1:Y=INT(RND#12)+#1 )EE 
1448 IF JE(X,Y)8 THEN 1434 JWN 
1458 POKE &AD29,&AE:CALL RAGBD,FN PO(X,Y),SP(14) )QA 
1468 GAN=9:FIN=9:READ cube:READ AS:IF AS=8 THEN 1489 VX 


1478 READ AX,AY,ALT:CALL &ABBD,FN POCAX, AY), SP(11):JECA DLY 
X,AY)=21 











1484 AF=14:G0SUB 2848:GOSUB 2819:tien=9:RETURN )RN ° 2959 REM sistsstesseetssessiitss 

1498 REM sissssresesseeseenentes >ZP | 2868 REM : : 

1599 REM : | >RF | 2976 REM :  PRISE/LACHER 

1519 REM : ROUTINE PRINCIPALE : >ZH | 2888 REM : : 

1528 REX : : DRH | 2998 REM :escsssssessesesenene 

1538 REM sssssssessessessesenece >ZJ | 2198 IF JE(X,Y)<2 OR JE(X,Y)>19 THEN 1558 

1548 WHILE INKEY$="":VEND:EVERY 49,1 GOSUB 2648 QZ | 2118 IF TIEN=1 THEN 2168 

1559 IF fin=1 THEN 2929 )QR | 2128 ENT 3,189,-59,3B:SOUND 1,698,19,6,9,3 

1568 IF INKEY(S)xINKEY(72)=9 THEN 1649 EG | 2139 CALL &AGOD,FN PO(X,Y),SPCAF):CALL &ASBD,FN PO(X,Y) 
1579 IF INKEY(2)#INKEY(73)=9 THEN 1718 DEJ | ,5P(15) 

1588 IF INKEY(8)*INKEY(74)=9 THEN 1788 DEA | 2148 CALL &AB9B,FN POCX,Y):TIEN=1 

1598 IF INKEY(1)*INKEY(75)=9 THEN 1948 )ET | 2158 ACT-JE(X,Y):VHILE INKEY$C>"":WEND 

1698 IF INKEY(9)*INKEY(76)=9 THEN 2199 EG | 2168 FOR T=1 TO SSB:NEXT:AF-28:G0T0 1558 

1618 IF INKEY(47):9 THEN fin:1 DXW | 2179 REM ::: LACHER ::: 

1628 GOTO 1558 >MH | 2188 ENT 3,199,-59,39:SOUND 1,698,19,6,9,3 

1639 REM ::: VERS LE HAUT ::: VA | 2199 CALL &ABGD,FN PO(X,Y),SP(15) 

1649 IF JEUX, Y-1)>19 OR TIEN=1 THEN 1559 >FG | 2298 TIEN=S:UHILE INKEY$C)"":NEND 

1659 GOSUB 1669:Y=Y-1:G0T0 1559 »ZM | 2219 GOSUB 2288:F0R T=1 TO SBD:NEXT 

1669 CALL &ABZD,FN POUX, Y), SP(AF):CALL &A852,FN PO(X,Y) >ZA | 2228 CALL &ABOD,FN PO(X,Ÿ),SP(14):AF=14:G0T0 1559 

1679 FOR 1=1 TO 3:CALL &A95C, SP(AF) )BM | 2239 REM ssssssenssseseesesenses 

1688 FOR T-1 TO 28:NEXT:CALL LAÿGE, SP(AF):NEXT 1 DRT | 2248 REM : ! 

1699 CALL &ABSC, SPCAF):RETURN )YY | 2259 REM : EXPLOSION 

1798 REM ::: VERS LE BAS ::: DUB | 2269 REM : ! 

1719 1F JE(X,Y+1)19 OR TIEN=1 THEN 1559 DFC | 2279 REM :irsssseseesesessenees 

1728 GOSUB 1738:Y=Y+1:G0T0 1559 )ZF | 2288 BODM-8:1F JE(X,Y-1)=ACT THEN BX=X:BY=Y-1:GOSUB 234 
1738 CALL &ABOD,FN PO(X,Y),SP(AF):CALL &A@52,FN PO(X,Y) DYG | ÿ 

1748 FOR 1:1 TO 3:CALL &A97B, SP(AF) )BL | 2298 IF JE(X,Y+1)=ACT THEN BX=X:BY=Y+1:GOSUB 2349 

1758 FOR T=1 TO 2B:NEXT:CALL &ABGE, SP(AF):NEXT I RQ | 2398 IF JE(X+1,Y)=ACT THEN BX=X+1:BY=Y:GOSUB 2348 

1768 CALL &AS7B, SP(AF) :RETURN DYX | 2318 IF JE(X-1,Y)=ACT THEN BX=X-1:BY=Y:GOSUB 2349 

1779 REM ::: À GAUCHE ::: DRR | 2329 IF BOOM=1 THEN BX=X:BY=Y:GOSUB 2348:B00M:8 

1788 IF je(x-1,y)>19 THEN 1558 DNA | 2338 RETURN 

1798 IF TIEN=1 THEN 1869 DRF | 2349 CALL &ABGD,FN PO(BX,BY), SPCACT#1) 

1898 GOSUB 1819:x=x-1:G0T0 1559 )2D | 2358 SOUND 4,9,-1,15,3,,39 

1819 CALL &ABOD,FN polx,y),sp(AF):add=FN po(x, y) RP | 2369 CALL &ABBD,FN PO(BX,BY),SP(12):FOR T=1 TO 294:NEXT 
1828 FOR 1=1 TO 3:CALL &ASOD, add-1, sp(AF) DHY 2378 CALL &ABOD, FN PO(BX, BY), SP(12) 

1839 FOR t=1 TO 2B:NEXT t:CALL &ABBD, add- 1, sp(AF) :NEXT DAT 2388 CALL LABGD, FN PO(BX,BY), SP(13):FOR T=1 TO 288:NEXT 
l 2398 CALL &ABOD,FN PO(BX,BY),SP(13) 

1848 CALL EABBD, add-4, sp(AF) :RETURN 'DF | 2499 CUBE=CUBE-1:1F CUBE=9 THEN GAN=1:FIN:1 

1859 REM ::: DEPLACEMENT AVEC CUBE ::: DEP | 2418 BODM-1:JE(BX, BY)=9:RETURN 

1868 IF JE(X-1,Y) C8 THEN 1558 NB | 2429 REM :istrerereseresenseses 

1879 JE(X,Y)=9:GOSUB 1819:X=X-1:JE(X, Y)=ACT HD | 2438 REM : 

1888 SOUND 1,398,3,5,,,6:S0N-8 JXH | 2448 REM : SUR L'ASCENSEUR 

1899 IF JE(X,Y+1)=21 THEN 2479 DU | 2458 REX : ! 

1998 IF JEUX, Ÿ+1) 08 THEN 1558 NU | 2469 REM strtreresenesenesesenes 

2019: JEP4 NSBSROSUE OR ERR EME NIET HZ | 2478 HAU=B:PAU=Q:FOR H=ALT-1 TO Y-1:1F JECX,H) OS THEN 
1928 SOUND 1,49+(S0Nx19),3,5,,,6:G0T0 1899 DB | pAU-1 

1939 REM ::: A DROITE ::: RT | 2489 HAU=HAU+4:NEXT:IF PAU:1 THEN 1558 

1948 IF je(xt1,y)>19 THEN 1558 NN | 2498 POKE &AD29,8:CALL LAD52,FN POUX, Y):POKE LAZOA, 32:P 
1959 IF TIEN=1 THEN 2928 )RR | OKE LAB1A, 32 

LEA RISNR THERE Ar 2R | 2598 CALL &AR9B,FN POCX, Y):ANC=JEUX, Y):JECX, Y)=8 

ne Mn ee potx, y} RX | 2518 FOR H:1 TO HAU:CALL &A9SC, SP(AF) 

L = ! ASOD, add+ 1, sp(AF) HD ÿ , ; . 

1999 FOR t:1 TO 2B:NEXT t:CALL BABAD,adde1,spoar):nexT Day | 2727 FOR TF1 TO SBNENT T,H:PORE EAPSA, 16:F0KE LADA, 16 
I 2539 Y=ALT-1:JE(X, Y)=ANC 

2898 CALL &ABDD, add+4, sp(AF) :RETURN pr | 2548 CALL &AB52,FN POCX, ALT) :FOR H=HAU+{ TO 2 STEP -1 
2919 REM ::: DEPLACEMENT AVEC CUBE ::: DEC | 2559 FOR T=1 TO 32:NEXT:CALL RAGE, SP(1) 

2828 IF JE(X+1,Y)©89 THEN 1558 DWM | 2569 CALL &AB7B, SP(11):NEXT H 

2939 JE(X,Y)=9:G0OSUB 1978:X=X+1:JEUX, Y)=ACT )HX | 2579 POKE LAU28,&AE:GO0TO 1558 

2848 GOTO 1889 DNA @ 2588 REM :isssrssesesesesesenes: 


49 


>ZG 
RH 
UG 
>RK 
>ZL 
)GP 
RM 
>GP 
HK 


AZ 
HU 
>GP 
)QR 
>GH 
AC 
)CG 
>CA 
)RI 
)ZG 
RH 
>RN 
RK 
)ZL 
>BG 


TR 
>TH 
TN 
)RJ 
)FB 
)FU 
>TU 
)YB 
)CA 
)YE 
CD 
>HC 
)AG 
)ZH 
RJ 
)ZJ 
)TA 
ZM 
)ER 


)FM 
MJ 


)TX 
>DA 
)YN 


>UU 
DUC 


>GA 
DL 
JWX 
)2Q 





2599 REM : 

2698 REM : GESTION COMPTEURS 

2619 REM : ! 

2628 REM sstssesesessesessesses 

2639 REM ::: LE TEMPS ::: 

2648 Di:tp=tp-2:PLOT 454,tp,9:PLOT 458, tp 

2659 IF tp=12 THEN fin=1:EL:RETURN ELSE EI :RETURN 

2669 REM ::: SCORE ::: 

2679 IF sc=8 THEN a$="#99909" :2L=32:YL:9:G0SUB 949:RETU 
RN 

2688 a$=STR$(sc) :A$=RIGHTS(A$, LEN(A$)-1) 

2699 IF sc<19 THEN ZL=35:YL:9:G0OSUB 949:RETURN 

2798 IF sc<188 THEN ZL:34:YL=9:GOSUB 949:RETURN 

2718 IF sc(1998 THEN ZL=33:YL=9:GOSUB 949:RETURN 

2728 1L=32:YL=9:G0SUB 949 :RETURN 

2739 REM ::: RECORD ::: 

2749 IF REC-8 THEN a$="#99999":ZL=32:YL=14:GOSUB 94#:RE 
TURN 

2758 a$=STR$(REC) :AS$=RIGHTS(AS$,LEN(AS$)-1) 

2768 IF REC<19 THEN ZL=35:YL:14:G0SUB 949:RETURN 

2778 IF REC(199 THEN ZL:34:YL:14:GO0SUB 949:RETURN 

2789 IF REC(1998 THEN ZL=33:YL=14:GOSUB 949 :RETURN 

2798 2L=32:YL=14:GOSUB 949:RETURN 

2899 REM ::: VIE ::: 

2818 a$=STR$(vie):A$=RIGHTS(AS, LEN(A$)-1) 

2829 2L=37:YL=19:GOSUB 949:RETURN 

2839 REM ::: TAB ::: 

2849 a$=STR$(ta):A$=RIGHTS (AS, LEN(A$)-1) 

2858 IF TACIS THEN ZL-=33:YL:23:G0SUB 949:RETURN 

2869 ZL=32:YL=23:GOSUB 949 :RETURN 

2879 REM sosssessssssesessecues: 

2889 REM : ! 

2898 REX : GAGNE/PERDU 

2999 REM : : 

2919 REM sstssssseesssseesesees 

2929 FOR H=8 TO 3:MU=REMAIN(H) :NEXT 

2938 VHILE INKEY$O"":WEND: IF gan:ÿ THEN 3938 

2948 FOR H=1 TO 16:BORDER h:SOUND 1,h#15,19,14:FO0R t={ 

TO 299 

2958 NEXT t,h:BORDER 9 

2969 ENV 19,15,-1,1 

2978 tp=tp-4:PLOT 454,tp+2,4:PLOT 458,tp+2:PLOT 454, tp: 
PLOT 458, tp:sc=sc+t{:GOSUB 267 

2988 SOUND 1,9,15,15,19,,15:1F TP<I6 THEN 3899 ELSE 207 
ÿ 

2998 REM CLAUDE TEL 96 38 94 24 

3899 TA=TA+{:IF SCDREC THEN REC=SC:GOSUB 2749 

3819 GOTO 1939 

3929 REM ::: PERDU ::: 

3838 BORDER 26:INK 9,26: SOUND 4,1598,59,7,9,0,19 

3848 FOR t=1 TO 4999:NEXT t:BORDER 9: INK 9,8 

3858 SOUND 1,239,28,6:SOUND 1,8,2,6:SOUND 1,239,28,6:S0 
UND 1,319,28,6:SOUND 1,213,28,6:SOUND 1, 239, 49,6 : SOUND 

1,319,28,6 

3868 PEN 11:FO0R H=1 TO 5:LOCATE 18,3:PRINT CHR$(214):F0 
R T=1 TO 49G:NEXT T:LOCATE 18,3:PRINT CHR$(213):FOR T=1 
TO 29B:NEXT T,H 

3878 vie=vie-1:GOSUB 2819:1F vie:g THEN 3998 

3889 FOR T=1 TO 2808:NEXT T:TA=TA-1:C0T0 3808 


)KY 
JVC 
)PA 
)CL 


HV 
0 
>RH 
)TA 
)CL 
)QL 
)EL 


)JC 
>TC 
JUN 
»VQ 
CB 
MD 
)JK 
)CF 
HT 
HR 
>RK 
)CZ 
)2T 
>TH 
)TY 
)TA 
)ZH 
)DE 
HY 
DB 


)QE 
)LA 
)TU 


UD 


NE 
>NK 
DLF 
)PV 
>PG 
KW 
WG 


CH 


>LU 
)HC 


3899 FOR T=1 TO 28B9:NEXT T:taint=INT(RND*4) : TA=TAINT#6 
tvie=5:sc=9:G0SUB 2679:G0T0 3999 

3199 REM sossssssseesenesesseese 

3119 REM : : 

3128 REM : PRESENTATION 

3138 REM : ! 

9148 REM sssssssssssesseseesesce: 

3158 ENV 1,127,127,1:ENT 1,127,1,1 


3168 OUT &BC89,6:OUT &BDY9, 24: BORDER Ÿ 

3178 REM ::: LE FOND ::: 

3188 MODE Q:RESTORE 3198:FO0R F=9 TO 15:READ A:INK F,A:N 

EXT 

3198 DATA 8,1,2,5,11,14,29,23,26,24,15,6,3,6,15,24 

3289 RESTORE 3698:EVERY 25,2 GOSUB 3629 

3219 ZGR=4:2PE=8:2PE1=8:24=398:ZPL=9,5 

3229 FOR 2F:9 TO 649 STEP ZGR:FOR ZG=ZF TO ZF+2GR STEP 

4:PLOT 2G,2W,ZPE:DRAN 26,ZW-ZGR:NEXT 2G:2PE=ZPE+1:1F ZP 

E)15 THEN ZPE=8 

3238 NEXT 

3249 ZW=ZU-2GR:2GR=ZGR+ZPL:ZPL=ZPL+9.86:1F ZUCQ THEN 32 

89 

3258 ZPE1=2PE1+1:1F Z2PELD15 THEN ZPE1:8 

3269 ZPE=ZPE1:GOTO 3228 

3278 REM ::: LE TITRE ::: 

3289 enc=1:A$="POUSNIK ":20F-9.1498:y2:229:c1=29:GOSUB 

3298:G0T0 3398 

3298 LOCATE 1,25:PEN 1:PRINT A$ 

3399 FOR y1%=2 TO 14 STEP 2:x%=49:Zc=c1 

3318 FOR x1%-ÿ TO LEN(A$)+32 STEP 4 

3328 x%=x%+19:2C=Zc-20F:y%=y2+2c4 (y1%-8) 

3338 IF TEST (x1%,y1%)=8 THEN GOTO 3368 

3349 cX=Zc:PLOT -19,-19,enc:enc=enc+1:1F enc=4 THEN enc 

=1 

3359 FOR h4=y%-cX TO y%+c% STEP 2:MOVE x%-4,h%:DRAUR 8, 
g:NEXT h% 

3369 NEXT x1%,y1% 

3379 LOCATE 1,1:PRINT CHR$(22)+CHR$ (1) 

3368 PEN Z:LOCATE 1,24:PRINT " BY  LNC SOFVARE":LOCAT 

E 1,1:PRINT CHR$(22)+CHR$ (9) 

3398 FOR h:9 TO 14 STEP 2:PLOT #,h,8:DRAN 648, h:NEXT 
3489 WHILE INKEY$="" 

3418 INK 8,26:INK 9,24:INK 19,15:INK 11,6:INK 12,3:INK 
13,6:1INK 14,15:INK 15,24 

3428 FOR T=1 TO 38:NEXT 

3439 INK 9,26:INK 19,24: INK 11,15:INK 12,6: INK 13,3: INK 
14,6:INK 15,15:INK 8,24 

3449 FOR T=1 TO 3B:NEXT 

3458 INK 19,26:INK 11,24:INK 12,15:INK 13,6:INK 14,3:IN 
K 15,6:INK 8,15:INK 9,24 

3468 FOR T={ TO 32:NEXT 

3479 INK 11,26:INK 12,24:INK 13,15:INK 14,6:INK 15,3:IN 

K 8,6:INK 9,15:INK 19,24 

3489 FOR T=1 TO 32:NEXT 

3498 INK 12,26:INK 13,24:1INK 14,15:INK 15,6:INK 8,3:INK 
9,6:INK 19,15:INK 11,24 

3598 FOR T=1 TO 38:NEXT 

3519 INK 13,26:1INK 14,24:INK 15,15:INK 8,6:INK 9,3:INK 
18,6:1NK 11,15:INK 12,24 

3528 FOR T=1 TO 3B:NEXT 


DUC 


)2D 
RE 
UF 
RG 
)ZH 
ZE 
)EL 
UK 
)CX 


>PH 
)FM 
NT 
>KD 


>KK 
)FA 


>GU 
>TP 
)RJ 
>UQ 


JYR 
)EY 
>AN 
)JX 
)EJ 
)BE 


HR 
)LJ 
>FN 
DAT 
NV] 
>PN 
>AD 


)QG 
AZ 


)RA 
AV 


RC 
)AZ 


RE 
)AD 


)QF 
DAY 


>QH 


3538 INK 14,26:INK 15,24: INK 8,15:1NK 9,6:INK 19,3:INK 


11,6:INK 12,15:INK 13,24 
3548 FOR T={ TO 3:NEXT 


3559 INK 15,26: INK 8,24:INK 9,15:INK 19,6:INK 11,3: INK 


12,6:1INK 13,15:INK 14,24 
3569 FOR T=1 TO 3D:NEXT 
3574 VENDECLS:OUT &RCAS,G:OUT LBDYD, 2S:nu=REMAIN(2) 


3589 CALL &BCA7:mu=REMAIN(2):DEF INT a-y:present=1 :GOTO 


419 
3598 REM ::: LA MUSICA ::: 


3689 DATA 159, 159,39, 199, 199, 29, 239, 239, 49, 199, 199, 49,1 
59,159, 49, 119,199, 89,95, 159,38, 196, 159,29, 119, 142, 48, 19 
9,199, 49,169, 213, 49, 159, 213, 89, 159, 159, 29, 159, 159, 29, 95 
1159, 69, 196, 159,28, 119,159, 49, 127, 159,89, 142,179, 29, 127 


179,29, 119, 198, 49, 119, 199,49 
3619 DATA 159,159, 49, 198, 198, 49, 239,239, 49, -1,-1,-1 


3629 DI:1F (SQ(1) AND 7)-8 THEN EI:RETURN ELSE READ ni, 


n2,n3 

3638 IF nl=-1 THEN RESTORE 3689:G0T0 3624 

3649 SOUND 1,n1,n3,5:SOUND 2, n2,n3,4:G070 3628 

3659 REM ::: REGLES ::: 

3669 RESTORE 3699:EVERY 25,2 GOSUB 3629 

3679 a$=" POUSNIK":ZL=1:YL=1:GOSUB 948 
3689 a$=" tissses"eZL=1:YL=2:GOSUB 949 


3698 a$=" DEPLACEZ LES CUBES AVEC LE":ZL:1:YL:4:GOSUB 


949 


3798 a$="TRANSPORTEUR<LORSQUE 2 OÙ 3":ZL:1:YL:6:GOSUB 


948 


3718 a$="CUBES IDENTIQUES SE TOUCHENT" :ZL={ : YL:8:GOSUB 


94g 


3729 a$="APPUYEZ SUR FEU OU COPY POUR":ZL=1:YL:19:GOSUR 


948 


3738 a$="LES FAIRE DISPARAITREC<<":ZL<1:YL=12:GOSUB 948 


3749 a$=" PLUS DE CUBEC<<C)EST GAGNE":ZL=1 :YL=14 : GOSUB 


9àg 


3758 a$="ET VOUS ACCEDEZ AU TABLEAU":ZL=1:YL=16:GOSUB 


949 


3769 a$="SUIVANT<(C SIMPLE NON ?":ZL=1:YL=18:GOSUB 94ÿ 


3778 a$=" EN CAS D)ECHEC UTILISEZ LA":ZL=1:YL=28 :GOSUB 


g4ÿ 


3788 a$="TOUCHE : ESPACE :":2ZL:1:YL=22:GOSUB 948 


3798 a$=" BONNE CHANCE":2L=1:YL=24:GOSUB 948 
3869 VHILE INKEY$="":UEND:WINDOW #2,1,15,1,25:CLS #2 
3818 MU=REMAIN(2):CALL &BCA7:RETURN 

3829 REM stssssessessenseneseess 

3838 REM : : 

3848 REM : DATAS 24 TABLEAUX 

3859 REM : ! 

JB68 REM ssrssrereseeseeeneenese 

9878 REM ::: TAB 1 ::: 

3888 DATA XXXXXXXXXXXAX, XXXXXXXAXXXXX, XXXXXXXXXAXXX 
3899 DATA AAAAAAAAAAAAA, A20080800800À, A70079600099À 
3999 DATA 427268780088, AAAAAAAAAAAAA, XXXXXXXXXXXXX 
3919 DATA XXXXXXXXXXAAX, XXXXXXXXXXXXX, XXXXXXXXXXXXX 
3928 DATA 11,9 

3939 REM ::: TAB 2 ::: 





)AC ' 3948 DATA AAAAAAAAAAAAA, A98958549383A, A9BB989131314 
3959 DATA A90079701919A, AG0030300000À, A343434B0090A 

)RB | 3968 DATA A131313929094, AD1918100008A, AGDOOB09BA0BA 

AG | 3979 DATA AS0000019000À, ADOGDOOG9DODA, AAAAAAAAAAAAR 

3984 DATA 22,9 

)RD | 3999 REM ::: TAB 3 ::: 

>xQ | 4899 DATA XXAAAAAAAAAXX, XXAGOBGDBGAXX, XXABSBBDBEAXX 

)FH | 4919 DATA XXA914H005AXX, XXA9119B01AXX, XXAGBG9BOBAXX 

4929 DATA XXAGGBGDBDAXX, XXAGOBODBGAXX, XXABOBBGBGAXX 

TR | 4939 DATA XXAG9G5BDDAXX, XXA923124BAXX, XXABAAAAAAAXX 

>XV | 4948 DATA 8,1,4,12,4 

4959 REM ::: TAB 4 ::: 

4968 DATA XXXXXXXXXXAXX, XXXXXXXXAXXAX, XXAAAAAAAAAXX 

4070 DATA XXA2600854AXX, XXAB380811AXX, XXAL1GSBDBAXX 

4988 DATA XXAD949GB0AXX, XXAND13DBDAXX, XXABD159BBAXX 

RD | 4998 DATA XXA4118236AXX, XXAAAAAAAAAXX, XXXXXXXXXXXXX 

)DF | 4198 DATA 14,8 

4119 REM ::: TAB 5 ::: 

DHG | 4128 DATA XXAAAAAAAAAXX, XAZSBBDAGAXX, XXABBBGDBDAXX 

)PA | 4139 DATA XXAG99786AXX, XXA911111BAXX, XXABBGGOBDAXX 

DQR | 4149 DATA XXAD117419AXX, XXAD1B191BAXX, XXAB1BG91BAXX 

)FY | 4159 DATA XXAD19BD19AXX, XXA19191BAXX, XXAAAAAAAGAXX 

)PL | 4168 DATA 9,1,18,12,7 

)NM | 4179 REM ::: TAB 6 ::: 

)FX | 4188 DATA AAAAAAAAAAAAA, A2429B0083634, A5D698908707A 

4199 DATA A43509600543A, A11100000111A, AGG000909090À 

DHR | 4299 DATA ASPOG000B008A, AGGGOB00000BA, AGGOOBGOB00DA 

4219 DATA A11199099111A, A111199B1111A, AAAAAABAAAAAA 

DHL | 4228 DATA 16,1,7,12,5 

4239 REM ::: TAB 7 ::: 

)JJ | 4248 DATA XXXXXXXXXXXXX, AAAAAAAAAAAAA, A209959482984A 

4259 DATA AD3030409050A, AGOG00000000A, AGO006909080À 

)CX | 4269 DATA A11119191998A, A11111111900A, AGGU9PG9B09BA 

4270 DATA A29099000019A, AAAAAAAAAAABA, XXXXXXXXXXXXX 

)GB | 4288 DATA 12,1,12,11,8 

4299 REM ::: TAB 8 ::: 

)GH | 4398 DATA XXXXXXXXXXXXX, XXXXXKAXAXXAX, XXXXXXXXXXXXAX 

4318 DATA XXXAAAAAAAXXX, XXXAB4B4GAXXX, XXXA205BGAXXX 

)BG | 4328 DATA XXXAGGSZABAXXX, XXXAGB5G2AXXX, XXXAAAAAAAXXX 

4338 DATA XXXXXXXXXXXXX, XXXAXXXXXAXXX, XXXXXXXXXXXXX 

)GW | 4348 DATA 19,9 

4359 REM ::: TAB 9 ::: 

DXC | 4368 DATA AAAAAAAAAAAAA, AGOGOB0GG09BA, AGB681919978A 

4379 DATA A11111911111A, ADOGO0000000A, ABGDOGGBD000A 

DVA | 4385 DATA AGBOGG9GB000A, AOPB070885994, A97050908068A 

DJ | 4399 DATA AOGGG9000000A, AGOGBO0G900A, AAAAAABAAAAAR 

EG | 4498 DATA 14,1,7,12,3 

)2N | 4419 REM ::: TAB 19 ::: 

)TD | 4429 DATA XXXXXXXAAAAAA, XXXXXXXAG234A, XXXXXXXAB567A 

)XH | 4439 DATA XXXXXXXADOZGA, AAAAAAAAGBODA, A23400000089A 

)TF | 4449 DATA A5SG67DBAAAAAAA, ADO29BAXXXXXX, AGBBBBAXXXXAX 

)ZT | 4459 DATA ABBBBGAXXXXAX, AG1Z1ZAXXXXXX, AAAAAAAXXXXXX 

JNU | 4468 DATA 16,9 

DHB | 4479 REM ::: TAB 11 ::: 

DUA | 4488 DATA XXXXAAAAAAXXX, XXXXA259BAXXX, XXXXA376BAXXX 

)ZL | 4499 DATA XXXXAG62BAXXX, XXXXAOB3BAXXX, XXXXA47AGAXXX 

HV | 4598 DATA XXXXAZ592AXXX, XXXXABDBBAXXX, XXXXABOSBAXXX 

DHJ | 4519 DATA XXXXAG1BBAXXX, XXXXABLBGAXXX, XXXXAAAAAAXXX 

)NR à 4529 DATA 18,9 





51 


UF 
TH 
>RH 
DUJ 
)JG 
NZ 
)YH 
)XZ 
XL 
)YH 
MR 
)NM 
)FJ 
»XB 
>XH 
CL 
JHC 
>NK 
)YG 
)XB 
XF 
)YH 
NH 
NT 
DUA 
RZ 
RH 
)UR 
NL 
)NQ 
)2G 
RP 
RE 
)ZF 
>PD 
NY 
HN 
)AN 
AR 
HR 
HE 
NY 
JUL 
RC 
TH 
JUL 
NG 
)PB 
)BA 
JUN 
)YB 
AY 
)JD 
)PJ 
)CD 
)BK 
)BN 
)BY 
)JC 


4539 REM ::: TAB 12 ::: 

4549 DATA AAAAAAAAAAAAA, A37503899345A, A705079000589A 
4558 DATA A54305000038À, 384893450453, AGO0G9000009À 
4569 DATA A9B0090080080A, AGO0OB000098À, AOSOGOGG BOOBA 
4579 DATA AO0000000008À, ADGO0D0G99 ODA, AAAAAGAAAAAAA 
4588 DATA 24,1,6,12,6 

4599 REM ::: TAB 13 ::: 

4698 DATA XXXXXXXXXXXXX, XXXXXAAAXLAXX, XXAAAABAAAAXX 
4619 DATA XXABZGOBBOAXX, XXAGBDOGGBAXX, XAABGO3BDBAAX 
4629 DATA XA294686492AX, XAAGBB30B8AAX, XXAZDB9GBGAXX 
4639 DATA XXAAGGDBDAAXX, XXXAAABBAAXXX, XAXXXAAAXXXXX 
4649 DATA 12,1,8,11,5 

4658 REM ::: TAB 14 ::: 

4668 DATA XXXXXXXXXXXXX, XXXXXXAXXXAXX, XXAAAAAAAAAXX 
4679 DATA XXAB9HDBDBAXX, XXAG2BBB94AXX, XXA7549357AXX 
4688 DATA XXA1119111AXX, XXA3279263AXX, XXAB4PGG9GAXX 
4698 DATA XXA99YDODSAXX, XXAAAAAAAAAXX, XXXXXAXXXXXXX 
4788 DATA 24,8 

4719 REM ::: TAB 15 ::: 

4728 DATA AAAAAAAARAAAA, ABGDBBDDAGUEA, AdA264GAGOS GA 
4738 DATA A91111911119A, A99981919900A, A19801919B91A 
4749 DATA A11911911911A, A19991912921A, A11991911211A 
4759 DATA A49121918499A, A93205919843A, AAAAAABAAAAAA 
4768 DATA 23,1,7,12,4 

4779 REM ::: TAB 16 ::: 

4788 DATA AAAAAAAAAAAAA, AGBGOBO0B99BA, A17111911611A 
4798 DATA A98981918989A,A11411911121A, AS96D1919990À 
4899 DATA A19111911151A, ABB98191898BA, A11111911111A 
4819 DATA A29651919704A, A69520997949A, AAAAAAGAAAAAA 
4829 DATA 26,1,7,12,3 

4839 REM ::: TAB 17 ::: 

4849 DATA XXXXXXXXKXXXX, XXXXXXXXAXAXX, XXXXXXAXXAXXX 
4859 DATA XXXAAAAAAAXXX, XXXA94449AXXX, XXXA4DBBAAXXX 
4869 DATA XXXA91444AXXX, XXXAAAAAAAXXX, XXXXXXXXXXXXX 
4879 DATA XXXXXXXXXXXXX, XXXXXXXXXAXAX, XAXXXXAXAXXXX 
4888 DATA 11,9 

4899 REM ::: TAB 18 ::: 

4998 DATA AAAAAAAAAAAAA, A20098298002À, A3080830B0034A 
4919 DATA AG90900000000 À, AG0060000900À, AGO000080009A 
4929 DATA ASBO000080000À, AGOGO000B000 À, AGDOO009080BA 
4939 DATA AGO009060008 À, AGGO901998DDA, AAAAAAAAAAAAA 
1949 DATA 6,8 

4959 REM ::: TAB 19 ::: 

4968 DATA AAAAAAAAAAAAA, A106080000 784, A18899907500A 
4978 DATA A19900000469 À, A190680006960À, AGOGOG080080 À 
4988 DATA ASSOD198B088A, AD1111111111A, AG119999605BA 
4999 DATA AB1198995479A, AGGDB0000B00A, ABAAAAAAAAAAA 
5898 DATA 11,1,2,12,7 

5919 REM ::: TAB 29 ::: 

5929 DATA XAAAXXXXXXAAX, ASBGAXXXXAB3A, A4BBBAAAADDGA 
5939 DATA AS9890080986A, XA911191118AX, XXA49BBBD3AXX 
5849 DATA XXXADBSDBAXXX, XXXXABBDAXXXX, XXXXXAGAXXXXX 
5858 DATA XXXXXASAXXXAX, XXXXXXBXXXXXX, XXXXXXXXXAXXX 
5868 DATA 19,1,7,11,5 

5979 REM ::: TAB 21 ::: 

5888 DATA AAAAAAAAAAAAA, A97879778098A, AGAAAAAAAAABA 
5899 DATA ABAXXXXXXXASA, ABAXXXXXXXABA, ABAXXXXXXXAGA 
5198 DATA ABAXXXXXXXAGA, ABAXXXXAAAABA, AGAXXXASIBABA 
5119 DATA ABAAAAAAGBASA, AGGGBD0B0BBBA, ABAAAAAAAAAAA 











lo 











>PG 
VB 
>TN 
RT 
UL 
JNV 
>PP 
EH 
)XE 
>WXH 
)BT 
DNN 
>PH 
)FQ 
)YN 
)YB 
)CF 
>HK 
>PK 
>UQ 
RG 
)TQ 
>UH 
NT 
)PT 
UF 
>TU 
)TC 
>UG 
)NR 
)PQ 
DHY 
>BH 
)DR 
>HB 
NE 
)PY 
UT 
)RR 
RT 
UF 
>CD 
)P4 
UF 
)RT 
>RA 
UM 
)N2 
NH 
)ZB 
DL 
CZ 
)FC 
)NG 
>PG 
NZ 
)CD 
)AA 
WF 


5128 DATA 9,1,2,12,3 >MP 
5138 REM ::: TAB 22 ::: )PE 
5149 DATA XXXXXXXXXXXAX, XXXXXXXXXAXX, XAXXXXXXXAXAX >HR 
5159 DATA XXXXAAAAAXXXX, XXXXAB28AXXXX, XXXXA222AXXXX )CB 
5168 DATA XXXXA323AXXXX, XXXXAB33AXXXX, XXXXAABAAXXXX >CG 
5178 DATA XXXXXXAXXXXAX, XXXXXXXXAXAXX, XXXXXAXXXKXAX >GD 
5188 DATA 12,9 >HK 
5199 REM ::: TAB 23 ::: )>PM 
5298 DATA XXXAAAAAAAAAA, XAAG9BOGB0BBA, AGSDAAAAAAABA JU 
5218 DATA ABABAXXXXXABA, AZADBAXXXXADA, ABA2BGAXXXABA )YY 
5228 DATA AGAAGIZAXXAGA, AGAXA24DAXABA, AGAXXA26DAABA >XY 
5239 DATA AGDAXXA240A9A, ABG2AXXA9BBBA, AAAAAXXXAAABX )XD 
5248 DATA 9,1,12,12,3 >NK 
5259 REM ::: TAB 24 fin ::: )TJ 
5268 DATA XXXXXXXXAXXXX, AAAAXAAAXAXXA, XAXXXXAXXAAXA )DE 
5279 DATA XAAXXXAXXAXAA, XAXXXXAXXAXXA, XAXXXAAAXAXXA )DF 
5288 DATA XXXXXXXXAXXXX, KXXXXXAXXLXNX, XAAAAAAAAAAAX )EY 
5299 DATA ABGO49684D08A, XAAAAAAAAAAAX, XXXXXXXXXXXXX )2Y 
5398 DATA 2,8 )BA 


DATAPOUS -BAS 


5 MEMORY &9669:N0DE 1 


7 LOCATE 1,18:PRINT " DATAS DE LA LIGNE CORRECTS":PEN 2 


19 A=k9809:F=LAGBB:L=188:WHILE AC=F:FOR A=A TO A+{S:READ C$:K=VAL 


(NRM+CS):S=S+K+65536#(S+K>32767):1F AC:F THEN POKE A,K 


28 NEXT:READ D$:T=VAL("&"+#D$):1F TCS THEN PRINT CHR$(7); "Erreur 


ligne*;L:END ELSE L=L+5 

25 LOCATE 29,18:PRINT L-5:WEND 

189 DATA 99, 89,99, 09,09,00,09,00,00, 09,00, 09, 95, 00,00,00,0009 
195 DATA 99,00,09,09,99, 00,06, 00, 09,00, 00,00, 96,00, 060,090, 0009 
119 DATA 99,89, 09, 00,00, 99,00,09,09,00,09,08, 00,08, 00,09, 0008 
115 DATA 99,00, 90,00,09,60,05,00,06,00,00,00, 00,09, 00,00, 000 
128 DATA F3,F3,F3,F3,F3,F3,F3,E6,F3,0C, 79, CC, F3, QC, 79, CC, #D33 
125 DATA F3,9C, 79,CC,F3,9C, 79, CC,F3,9C, 79,CC,F3,9C, 79,CC, 1883 
139 DATA F3,9C, 79,CC,F3,9C, 79,CC,F3,9C, 79,CC,F3,9C, 79,CC, 23D3 
135 DATA F3,9C,79,CC,F3,9C, 79,CC,F3,F3,F3,CC,E6,CC, CC, CC, 3864 
LD DATA 33,43,43,43,H3, C3, C3, 3,68, C3,C3,C3,63,D7, EB, C3, 3976 
145 DATA 63,FF,7F,C3,63,BF,3F,C3,77,BF,3F,EB,77,FF,7F,EB,437E 
159 DATA 77,FF,FF,EB,77,FF,FF,EB,77,FF,FF,EB,63,FF,FF,C3,58C2 
155 DATA 63,FF,FF,C3,63,D7,EB,C3,63,C3,C3,C3,63,C3,C3,C3,5C26 
169 DATA 33,33,33,33,63,C3,C3,C3,63,C3,C3,C3,63,35,35,61,6378 
165 DATA 63,35,35,61,63,3A,34,6B,63, 34, 3A,6B,63,35,35,61,6858 
179 DATA 63,35,35,61,63, 34, 3A, 6B, 63, 3A, 3A,6B,63,35,35,61,6D38 
175 DATA 63,35,35,61,63,C3,C3,C3,63,C3,C3,C3,63,C3,C3,C3, 7664 
189 DATA 33, 33,33, 33,63, C3,C3,C3,63,C3,C3,C3,63,D3,E3,C3, 7F6A 
185 DATA 63,F3,71,C3,63,F3,71,E3,63,D3,F3,E3,63,C3,F3,E3, 8AAG 
199 DATA 63,C3,D3,E3,63, C3, F3,E3,63,F3,F3,E3,63,F3,F3,C3,96B6 
195 DATA 63,D3,E3,C3,63,C3,C3,C3,63,C3,C3,C3,63,C3,C3,C3, A196 
289 DATA 33,33,33,33,63,C3,C3,C3,63,C3,C3,C3,63,C3,C3,C3, AA6G 
285 DATA 63,C3,C3,61,63,C3,92,92,63,C3,61,61,63,92,C3,61,B2FB 
219 DATA 63,92,C3,61,63,FF,D7,EB, 77,BF,75,7F,77,FF,FF,FF,BDD6 
215 DATA 77,FF,75,FF,63,FF,D7,EB,63,C3,C3,C3,63,C3,C3,C3,C93C 
229 DATA 33, 33,33, 33,63, C3,C3,C3,63,C3,49,C3,63,66,18,C3,DAAA 
225 DATA 63,59,18,61,26,59, 18,38, 26, 0C, 18,B2, 26,80, 18,B2, D49E 


52 





238 DATA 26, 6,18, 39,26, A6, BA, 39, 26, 5D,FF,38,26,FB,FB, BA, DBFS 
235 DATA 77,FF,FF,FF,63,FB,FB,EB,63,D7,FF,C3,63,C3, EB,C3,E878 
249 DATA 33,33, 33, 33,63, C3,C3,C3,63,C3,C3,C3,63,C3,61,C3,F9E6 
245 DATA 63,C3,61,C3,63,C3,61,C3,63,92,39,C3,63,92, 39,C3, F94A 
258 DATA 63,92,18,C3,63, 39,18,61,63,24,24,61,63,24,24,61,FESE 
-255 DATA 32,39, 18,39, 32,38, 18,39,63,C3,C3,C3,63,C3,C3,C3, SEA 
269 DATA 33, 33,33, 33,63, C3, 6B, C3, 63, D3, 7B, C3, 63, D3, 7B,C3, 8CF2 
265 DATA 63,B7,B7,6B,63,B7,DB,6B,63, 7B,9F,E3,63,3F,B7,E3, 162A 
278 DATA 63,D3,7B,C3,66, D3, 7B, C3,66, C9, 34, C3,66,C9,C3,61, 1F94 
275 DATA 66,0C,C3,61,63,CC,C3,61,63,C6,98,C3,63,C3,C3,C3, 296D 
289 DATA 33,33, 33, 33,63, D2, D2, C3, 72,82, 99,E1,63,82, 2A,C3, SBAA 
285 DATA 63,15,17,41,63,44,46,41,63,01, 93, 41,63, 91,93, 41, 33F8 
299 DATA 63,91, AB, 41,63, 09, 92, 41,63, 98,08, 41, 22,98, 08, 41, 36F5 
295 DATA 22,99,06,41,22,92,93,41,22,01,82,41,63,C3,C3,C3, 3AD2 
389 DATA 8C, 8C,8C, 8C, QD, 0F,9F,E, 1A, 1,25, 25, 1A,9F,9F, 25, 3C16 
395 DATA 6F,25,1A,9F,0F,0F,0F,0F,05,0F,8F,0A, 69,9C,B7,99, 3E2F 
319 DATA 89,9C,B7, 90,99, 9C,B7,09,99,9C, B7, 99,98, 9C, B7, 08, 437B 
315 DATA 88,9C,B7,90,08,9C,B7,98,88,9C,B7, 99, 89, QC, B7,09, 48C7 
328 DATA 68, AA,09,09,AA,55,09,EF, 99, E, AA, DF, 45, CF, AA, AA, 4FDE 
325 DATA FF,3F,5D,99,EF,3F,DF, AA,9F,9F,8E, AA, AE, CF, 6F, 4D, 58DF 
330 DATA AE, 4D,3F,CF,FF,9F,3F,DF,55,3F,6F,SD,EF,9F,2E, AA,616A 
335 DATA 55,9F,DF,AA,55,CF,5D,55,55,EF, AA, 99, AA, FF, 99, AA, G9FE 
349 DATA 88,80,99, 00,55, 09,08, 2A,99, 10,55, 98, 2A,00,88,55,6B76 
345 DATA 84,15,EF,15,98,FF,2E, 84,55, 2E,5D, 2A, 88,9F,3F,09, 763A 
355 DATA 889,BF,6F,DF, 7F,2E, 1D, AA, 99,50, 2E,9F,94,15,EF, 99, 75ED 
355 DATA AA,00,00,55,15,94,55, 00,04, 06, 2A, 15, 9,00, 69, 99, 779D 
369 DATA SC, 8C, 8C, 6C, 08, 09, 09, 04,98, 00,08,04,98,09,89,94,77F1 
365 DATA 96,90,99,04,08,09,08,04,98,09,00,64,06, 99, 09,04, 7821 
379 DATA 96, 60,89, 04,06, 99,99, 04,98,98,08,04,98,00,09,04, 7851 
375 DATA 98,00,90,04,98,99,08,04,88,00, 66,94, BC, OC, BC, GC, 78A5 
388 DATA 89,54, A8, 09,09, A8,54,00,54,08, 99, AB, AB, 08,88,54,7C95 
385 DATA A6,09,99,54,A8,09,00,54, AB, 09,09,54, 8,99, 00,54, 8985 
399 DATA A6,88,89,54, A8, 99,06,54, A8, 00,08,54, 8,00, 08,54,8475 
395 DATA A6,09,99,54,54,09, 08, 8,08, A8,54,00, 89,54, A6, 09, 8865 
499 DATA 59,60,80,00,09,E7,99,00,99,09,99,E7,90,00,08,98,8A33 
495 DATA 51,6E, 99,09,09,09,51,68E,96,00,00,00,E7,5D, 80,88, 8D35 
419 DATA 99,89,E7, 50,09, 99, 09,51, 8E, AA, 99, 90, 00,51,BE, AA, 916B 
415 DATA 59,00,96,E7,5D, 09,08, 09,60,E7,5D, 09, 89,99,51,8E, 94F2 
429 DATA A4, 89,89, 00,51, 6E, AA, 99, 98, 09, E7, SD, 98,08, 98, 08, 9869 
425 DATA E7,5D,99,09,09,51,8E, AA, 69,00,60,51,6E, AA, 69, 08, QCBF 
438 DATA 89,E7,5D, 89,99, 09,99,E7,5D, 99,98, 00,51, GE, AA, 89, AGDS 
435 DATA 09,09,51,8E, AA, 99, 00,09,E7,5D,00,00,89,09,E7,5D, A4E1 
449 DATA 99, 00,09, 80, GE, AA, 09, 09,00, 00, 8E, AA, 60,68,08,00,A751 
445 DATA 99,00, 00,00,00,00, 00,00, 80,00,00,00, 99,00, 00, 09, A751 
458 DATA 88,00,89, 09,09, 00, 00,00, 00,00, 08,08,08,08,08,08,A751 
455 DATA 99,00, 00,00,00,00,00,060,08,00,09,09,80,00,09,99,A751 
469 DATA 99,80,09, 00,09, 00,06, 00,00,08,00,09,98,98,09,08,A751 
465 DATA DD,5E,98,DD,56,91,DD,6E, 92, DD, 66, 93,96, 98, C5,ES, AESB 
478 DATA 96,82, 14,77,23,13,19,FA,E1,CD,26,BC,C1,18,EF,C9, B4FD 
475 DATA 15,9F,15,3F,45,45,45,45,94,04,84,04,55,FF, 89,99, BB1D 
489 DATA 99, 2A,15,2A, 99, BA, 99, BA, 06, 08,98,08,55,FF,08,08,BAFE 
485 DATA 15,3F,15,15,98,45,09,45,09,08,84,09,55,FF, 00,09, BD66 
499 DATA 15,93F,15,15,99, 45,99, 45,99, 0C,08,04,55,FF, 98,08, BFD2 


525 DATA 99,00,99,00,08,00,06, 60,06, 08, 89,09, 69, AA, 99,96, D143 
538 DATA 89,99,99, 80,09, 89,09, 00, 09,08, 98,00,06, AA ,55, 08, D2àA 
535 DATA 99,80, 00,0,09,09,06, 00,69, 09,08,88, 80, AA, 80,09, D2FC 
549 DATA 99, 9,09, 08,89, 09,06, 00, 09,09, 00,08, 99, AA,55, 60, D493 
545 DATA 85,22, 09, 2, 45, 00,08, 00,96,60,09, 09, 8,09, 80,09, D4QC 
559 DATA 89,24,15,15,45,45,08,45,09,08,08, 00,08, AA, 09,08,D671 
555 DATA 99, 24, 09, 2A, 68,64, 68,64, 69,08, 99, 09,00, AA, 60,09, DB8B 
569 DATA 15,3F,15,3F,45,45,45,45,04,0C,04,04,55,55, 08,08, DBO9 
565 DATA 15,3F, 15,3F,45,45,45,45, 94,98, 84, 94,55, FF, 89,09, DE2D 
579 DATA 15,3F,15,3F,45, 69,45, 00, 04,06,04,08,55,FF,06,00,E0BB 
575 DATA 15,24, 15,3F,45,45,45,45,04,04,94, 04,55, FF, 89,09, E3C6 
589 DATA 15,3F,15,3F, 45, 99,45, 09, 04,98,04,08,55, FF, 99,08, E65C 
585 DATA 15,5F, 15,3F, 45,98, 45,00,04,08, 04, 00,55, 09, 80,09, E7F3 
598 DATA 15,3F,15,3F,45,45,45, 09, 04,98,04,04,55,FF, 08,08, EACA 
595 DATA 15,15,15,15,45,45,45,45,94,4C, 94, 04,55,55, 69, 09, ECF4 
689 DATA 15,3F,49, 2A, 09, BA, 09, 8A, 09,08, 08,08,55,FF,09,69,EFEA 
685 DATA 15,3F, 99, 2A, 68,6, 00, 84,69, 98,09, 08,55, AA, 09,09, F28B 
619 DATA 15,15,15,15,45,45,45, 84, 04,08, 04, 04,55,55, 09,08, F4F6 
615 DATA 15,8, 15,08,45,08,45,09,84,09,04, 09,55, FF, 08,00, F706 
629 DATA 15,15,15,3F,45,CF,45,45,04,04,04,4,55,55,08, 85, FADC 
625 DATA 15,15,15,15,45,CF,45,CF, 84, 8C, 84,04,55,55, 09,09, FD1A 
639 DATA 15,3F,15,15,45,45,45,45,04,94,04,94,55,FF, 08,00, 0019 
635 DATA 15,5F,15,3F,45,45,45,45,84,0C,64,09,55, 09, 09,00, 0235 
649 DATA 15,9F,15,3F,45,45,45,45,94,04,04,04,55,FF, 08, AA, O5FF 
645 DATA 15,9F,15,3F,45,45,45,45,84,98, 94, 04,55,55, 09, 09, 0879 
659 DATA 15,9F,15,3F,45,09, 45,08, 04,0C,08,94,55,FF, 08, 80, 0B13 
655 DATA 15,9F,15,3F,49, 84,49, 8A, 89,08, 00,08, 90, AA, 99,09, GD89 
669 DATA 15,15,15,15,45,45,45,45,94,04,84,04,55,FF, 00,09, 1955 
665 DATA 15,15,15,15,45,45,45,45,84, 04, 84, 04, 89, AA, 09,09, 1277 
679 DATA 15,15,15,15,45,45,45,45,44,0C,84,0C,55,55, 98,9, 1449 
675 DATA 15,15,15,15,45,45,48, 8A,68,8,84,94,55,55, 09,09, 16CB 
688 DATA 15,15,15,15,45,45, 99, BA, 99,08, 99,08, 95, AA, 60,09, 18ED 
685 DATA 15,3F,99,15,99,45,88,6A,89,08,84,00,55,FF, 09,09, 1B85 
699 DATA 29,99,99, 09,09, 09, 09,09, 00,06,09,08,05,08, 00,99, 1BB5 
695 DATA 7C,C6,98,67,D8,D5, 11,58,C9, 19, D1,C9, 89, DD, 5E, 99, 22EA 
789 DATA DD,56,81,DD,6E, 92, DD, 66, 93,96, 19,C5,E5,96, 64, LA, 2895 
785 DATA AE, 77, 13,23, 18,F9,E1,CD, 68, A8, C1, 19,EE, CO, 99, 99, 2FCF 
718 DATA 89,89,00,6E, 99, DD,66,91,96, 18, AF, 77, CD, 98, A9, 19, 3517 
715 DATA F9, C9, 7C,D6,98,67, CB, 74,C9,D5, 11, B9, 3F, 19, D1, C9, 3E21 
728 DATA 55,E1,DD,6E, 99, DD, 66,91, 22,58, AB, C9, 2A,58, AG, CD, 4548 
725 DATA 42, A8, CD, 42, A, CD, 42, AB, CD, 42, A9, 22, 59, AG, 2A,58, 4D23 
738 DATA A8,DD,5E, 99, DD,56,91,CD, 19, AB, C9, 2A, 58, AB, CD, 98, 5468 
735 DATA AG, CD, 89, A8, CD, 89,8, CD, 88, A0, C3, 6B, A9, 09, 99,80, SB1D 
749 DATA 11,89, A4,DD,6E, 89, DD, 66,91,06, 19, C5,E5, 06, 4, 7E, GBAQ 
745 DATA 12,13,23,19,FA,E1,CD, 89, A, C1,19,EF, CO, 99, 99, 09, 66D2 
758 DATA 69,60,69, 80,09, 09,00, 06, 00,06, 00,08, 69,08, 60, 29, 66D2 
888 CLS:PRINT " FICHIER LANGAGE MACHINE CORRECT..." 

819 PRINT:PRINT:PRINT 

829 PRINT "UNE TOUCHE POUR LA SAUVEGARDE..." 

836 CALL LBB18 

849 SAVE "POUSBIN",B, 49898, 4829: END 


858 REM ::: POUR LES CPC 464 SANS D7 LE FICHIER #POUSBIN* DEVRA S 


E TROUVER A LA SUITE DU FICHIER POUSNIK SUR VOTRE K7 


495 DATA 98,15,98,3F,88,CF,45,45,894,0C, 89,04, 00,55, 89,99, C1E8 
589 DATA 15,9F,15,699,45,99,899,CF,99,04,94,04,55,FF,99,98,C4C5 
585 DATA 15,93F,15,15,45,98,45,CF,04,94,84,94,55,FF, 09,09, C889 
519 DATA 15,3F,89, 15,98, 45,99, BA,09,08,94,00,55,08,98,09,C999 
515 DATA 15,93F,15,15,45,45,45,CF,84,94,84,94,55,FF, 99,89, CD19 
528 DATA 15,3F,15,15,45,45,45,CF,99,04,98,04,55,FF, 99, 59, D991 


869 REM ::: EN CAS DE MSG D'ERREUR DU GENRE *TYPE MISMATCH IN 19 
# L'ERREUR EST DANS LA LIGNE DE DATA SUIVANT CELLE QUI A ETE DEC 

LAREE CORRECTE | 

879 REM ::: EXEMPLE ....... LA VERIFICATION MONTE JUSQU'A LA LIGNE 
288 PUIS VOUS AVEZ xTYPE MISMATCH IN 19 * VOTRE ERREUR EST DANS 

LA LIGNE 285 = 
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ABONNEZ-VOUS ! 





D'ECONOMIE 











5% de remise 


sur les produits 

du catalogue 

SORACOM 

— > = ————————- 
| je désire m’abonner à CPC infos pour ATTENTION ! 
0 U ] , un an au prix de 210 F (11 numéros) SEUL CE BULLETIN 
D'ABONNEMENT 

OP = —— EST VALABLE 
Adresse : 
CODE POSTAL WIND ET des 
Date : Signature tee 





CPC N° 29 


Q je désire payer avec une carte bancaire Date d'expiration 


° Les abonnements ne sont pas rétroactifs 





° Envoi par avion + 120 F croire ti re) LR 


Envoyez votre bulletin accompagné du règlement à : Editions SORACOM - Service abonnement - BP 88 - 35170 BRUZ 
54 











Les 10 meilleures chaînes étrangères de sport, 
musique, films, infos. avec ASTRA 1A 
Ou les chaînes françaises 1.2.5.6 LEE + 

avec c télécom 1C : 











Antenne parabole SD X 60 OFFSET ou SD X 80 OFFSET AMSTRAD 

9 60. Ensemble mécanique pour fixation murale 

9 80. Ensemble mécanique pour fixation murale ou sur terrasse ou sur mât. 
Convertisseur Marconi 10.95 - 11.75 GHZ - 1.8 Db Maxi. 


Démodulateur SR X 200 stéréo AMSTRAD. 

Commande à distance à infrarouge. 

16 canaux préréglés pour ASTRA. 

Affichage digital pour fréquence, canal et onde sous porteuse. 
Son stéréo de haute qualité ( WEGENER - PANDA ) 

Raccord RCA audio-stéréo. 

Alimentation 220 V - 50 Hz 

Câble coaxial de 20 mètres, équipé de fiche F. ù © 60 référence : int 60 A prix 3990 F 16 co ï 


“a or Le gpl | OPTION + 250 F 48 canaux “te 








Notice en français. 


Option 48 CX, avec démodulateur et télécommande © 80 référence : int 80 A prix CCC ET canaux 
OPTION + 250 F 48 CANAUX F 
TELECOM 1 C 
9 80 référence : int 80 Tprix 5300F 
Possibilité de coupler ASTRA + TELECOM | Re 
nous consulter nee 


SJ Tatlelelel er ACT nl 158 PA EUR 
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Quekt]ie 


EF, HÉERE SE Eee 












Ses. + ' E : Le © 
D) 230 F + port 
ECO) [230 F + po 

125 F + port 


175 F + port EE 


de 1 
a à 





102 F + port 102 F + port [190 F + port 
Se 


less - Module serrure 
| LL. 
dé. : {bien indiquer la boîte) 

; Lo 





155 F + port 





Port + 25 F par article : 
port + 40 F par articie pour l'étranger 


Voir bon de commande page :3 





